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PREFACE 



CONTROL DATA 6400/6500/6600 computers operate under the SCOPE operating 
system (Supervisory Control of Program Execution). This manual is a compre- 
hensive reference document written for system and user programmers. This 
revision reflects the SCOPE 3.2 release. 

The documents listed below are related software publications available 
through the nearest Control Data Corporation sales office. 
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INTRODUCTION 



The SCOPE operating system for CONTROL DATA® 6400/6500/6600 is a 
file -oriented system using mass storage, random access devices. It is 
designed to make use of all capabilities of the CONTROL DATA 6000 computer 
systems. SCOPE exploits fully the multiple -operating modes of all segments 
of the computer. SCOPE controls job execution, assigns storage, and per- 
forms segment and overlay loading. SCOPE features include comprehensive 
input/output functions and library maintenance routines. The dayfile main- 
tains a chronological record of all jobs run and any problems encountered. 
Dumps and memory maps are available to aid debugging. A variety of 
assemblers, compilers, and utility programs may be operated under control 
of SCOPE, including FORTRAN, COBOL, SORT/MERGE, PERT/TIME , 
EXPORT/IMPORT, RESPOND, SIMSCRIPT, APT, OPTIMA, ALGOL, and 
utility routines. 



6400/6500/6600 
COMPUTER SYSTEM 



The CONTROL DATA 6400/6500/6600 computer is composed of one or two 
high-speed central processors and ten peripheral processors. Each peripheral 
processor has its own memory and can execute programs independently of 
the other processors. In addition, all processors have access to the larger 
central memory. Up to seven jobs may operate concurrently, sharing the 
central processor in a multiprogramming manner. During a job, one or more 
peripheral processors are used for high-speed information transfer in and 
out of the system . 



OPERATING SYSTEM 
COMPONENTS 



Components of the SCOPE Operating System are distributed among the 
central memory, the peripheral memories and system mass storage devices. 
The central resident portion of the system consists of system tables and 
pointers, communication areas used to link the peripheral and central mem- 
ories, and frequently used subroutines for both central and peripheral 
processors. 



The system monitor routine is assigned to one of the peripheral processors 
and the system display program to another. The other eight peripheral 
processors have no fixed assignments but form a common pool available 
for assignment as needed. They contain idling routines that repeatedly 
examine their communication areas in central memory for requests. The 
remainder of SCOPE is stored on mass storage and in central memory and 
called as needed. 
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XI 



JOB PROCESSING 



A job consists of one or more programs, preceded by control cards specifying 
equipment, time limits, priority, operator instructions and other information 
needed by SCOPE . The operator initiates job loading from the system input 
unit into mass storage. SCOPE selects and processes jobs from mass storage 
and routes output to the proper devices. 

All system activities are controlled by the system monitor. The monitor ac- 
cepts messages from processors and routes them to processors for action. 
It communicates, with the resident programs in the other nine peripheral pro- 
cessors and with programs active in the central processor through central 
memory communication locations and control point areas. 

Central processor job operation is initiated or interrupted by an exchange 
jump command from the monitor routine. The central processor enters infor- 
mation about a new program into registers and stores the current information 
of the interrupted program in the new program's control point area. Hardware 
features insure that the interrupted program is left in a state for re-entry. 

Jobs assigned to control points and waiting for execution after interruption 
are stacked by priority. The job using the central processor is at the top 
of the stack. When it is interrupted (for example, to await completion of a 
peripheral processor function), the next job in the stack becomes the top, 
and the first job is temporarily removed from the stack. When it re-enters 
the stack, the job using the central processor, along with all jobs beneath it, 
are pushed down. 

Blocks of central memory storage assigned to control points occupy positions 
in central memory relative to the control point number to which they are 
assigned. Storage assigned to control points is relocated up or down as 
storage is released or required. Such relocation is possible because all 
references to central memory are made relative to the reference address 
assigned by the monitor routine. 



LOADER 



The loader performs the following functions: loads absolute and relocatable 
binary programs, links separately compiled or assembled programs, loads 
library subprograms and links them to user programs, detects errors and 
provides diagnostics, outputs a memory map, and generates overlays. 

The loader is used whenever relocatable programs are transferred from an 
input or storage device to central memory. Loading errors are written as 
diagnostics on the dayfile. During the loading process, the loader links sub- 
programs together and generates overlays as directed. 
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Three types of loading are performed: normal, segment, and overlay. 
Segments and overlays allow programs that exceed storage to be organized 
so that portions or groups of programs may be called, executed, and unloaded 
as needed. 



SYSTEM LIBRARY 

AND MAINTENANCE 

PROGRAMS The available system library and maintenance programs are EDITSYM, 

EDITLIB and UPDATE. EDITSYM and UPDATE provide symbolic, language- 
independent editing of program files, which alleviates the burden of main- 
taining large card files. A two-level editing technique permits the installation 
to make modifications to standard software without affecting the standard se- 
quence numbers. EDITSYM and UPDATE process symbolic card decks in 
compressed format. They can compress and sequence the source cards of 
one or more decks to form a program library or create a compile file from 
one or more decks in a program library. Modification of program libraries 
can be done independently or in conjunction with the creation of a compile file. 

The system library file is created and modified through the EDITLIB routine, 
This file may reside on mass storage and in central memory or on a dead- 
start load tape. EDITLIB runs in a normal multiprogramming environment 
and is submitted as a normal job. It can create a deadstart load tape from 
any combination of the following sources: the currently operating system, 
an already existing deadstart tape, and a binary input file. EDITLIB can 
delete, add, or change the residence of routines in a currently operating- 
mass storage/central memory system library. 



SYSTEM REQUESTS System requests enable the user to access certain variables in his operating 

environment, to manipulate data files, request dumps, and perform input/ 
output functions. These requests are grouped into file action requests and 
system action requests. 

File action requests consist of position functions, data functions, and file 
initialization functions. Position functions move files on sequential devices 
forward or backward, and position files on random access devices at 
specific locations. Data functions transfer data between hardware devices 
and central memory. Files are readied for processing by the file initiali- 
zation functions. 

A system action request for a checkpoint dump causes SCOPE to record all 
information relevant to the execution of the program. Execution may be re- 
started from the checkpoint dump rather than the beginning of the job. This 
feature is particularly useful for long jobs, which may not be run continuously 
from beginning to end. 
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Through other system action requests the user may release or request 
additional central memory or extended core storage. 



DAYFILE 



The dayfile is a mass storage file that holds a running account of all control 
cards, equipment assignments, error diagnostics, central and peripheral- 
processor time used, and input/output routines used by the jobs in central 
memory. At the end of a job printout, all dayfile messages associated with 
the job are printed. The dayfile can be accessed for accounting purposes. 
The latest dayfile messages are visible to the operator on one of the display 
scopes. 



SYSTEM DISPLAYS 



Two console screens provide system monitor information and central memory 
displays. Through the console keyboard the operator can control the operation 
of the running system . 



The operator can request various displays: the most frequently used are 
job status, system files, and dayfile displays. The job status display pro- 
vides Hie status of all jobs being executed, their priority, and position in 
the control point stack, the last program message, and other pertinent infor- 
mation. The system files display shows the status of jobs not yet being 
executed. The dayfile display gives the latest dayfile messages. As new 
messages are added to the bottom of the display old messages are removed 
from the top. 
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SYSTEM DESCRIPTION 



i.i 

hardware/ 
software 
integration 



When the computer is deadstarted, all the peripheral processors (PP's) 
are forced to read, and can be filled with programs from a system tape. 
Once this has been done, each of the PP's is completely sovereign; other 
components of the machine cannot force PP activity; they can neither put 
information into its memory nor read information out of its memory. A PP 
can be requested to receive, transmit, or process information only. (Every 
PP must contain a program for receiving and responding to requests.) 

A central processor (CP), though a main component from the user's view- 
point, is completely in the power of every PP at all times. Any PP, by 
executing one of its own instructions, can alter all the registers of a CP, 
write new information into central memory (CM) , or read information out of 
CM. A CP, on the other hand, cannot directly affect a PP in anyway (unless 
the central processor exchange jump option is available). 

PPO contains the monitor program (MTR) and is in permanent, overall control 
of the system; the other PP's cannot perform any function not approved in 
advance by MTR. A communication area in central memory is assigned to 
each PP. The first word of each communication area is the input register of 
the associated PP; the second word is the output register, and the remainder 
is the message buffer. 

PP9 is permanently assigned to the system display routine (DSD). The other 
PP's, 1 to 8, are initially assigned to read their input registers over and 
over. The monitor makes a request of a PP by putting a significant word into 
the input register of that PP. Upon finding the request, the PP obeys it (or 
determines that it cannot do so), indicates to the monitor via its output register 
that it has finished, and returns to its idling state of continually reading its 
input register. Thus all requests to a PP other than the monitor are com- 
municated through the input register of that PP. 

Each PP (other than MTR) uses its output register for requests to the monitor 
and for completion status of the requests. The monitor periodically reads 
the other PP output registers in turn, looking for requests, and zeros them 
whenever the requests have been satisfied. 
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1.2 

MULTI- 
PROGRAMMING 



Although the primary task of a PP is to act on request from MTR, on 
occasion a PP must request the cooperation of other PP's. Such requests 
are routed through the monitor. Furthermore, a PP must request per- 
mission from the monitor before using an I/O channel. Since every PP is 
capable of connecting itself to any channel, it is essential in preserving order 
that only one PP at a time try to use any one channel. To avoid an attempt 
by two PP's to use the same channel (which would disrupt both PP's and the 
channel), the monitor maintains a list of channels and their status. Before 
a PP can use a channel, it must request the monitor to assign that channel 
for its exclusive use. When finished with the channel, the PP frees the 
channel. 



1.2.1 

CENTRAL 
MEMORY USAGE 



CM low core, called the central memory resident or CMR, is reserved for 
system tables and programs and is never accessible to a user's CP program. 
The remainder of CM is allocated by the monitor to user jobs as they are 
selected on a priority basis for execution. SCOPE can supervise as many 
as seven separate CP jobs. 



1.2.2 

CONTROL POINTS 



Up to eight areas, numbered to 7, are designated as control points within 
central memory resident (CMR); the actual number is a configuration param- 
eter within CMR. Every CP program is assigned to a control point; control 
point is used for system functions. 

When a job is in CM, the control point area to which it is assigned includes 
the following information: job name, length, starting address in CM, time 
used so far, I/O equipment assigned to job, and its control statements. The 
control point area also contains an exchange package, a 16-word section 
consisting of the contents of all CP registers used in executing a program. 
This information is necessary to start or resume a program. The format of 
the exchange package follows: 



L-2 
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59 


53 




35 


17 O 




Program 

Address (P) 


A0 (Address 
Registers) 






Reference 
Address (RA) 


Al 


Bl (Increment 
Register) 




Field 
Lensrth (FL) 


A2 


B2 




Exit 
Mode (EM) 


A3 


B3 


RA-ECSt 


000000 


A4 


B4 


FL-ECSt 


000000 


A5 


B5 




Monitor 
Addressft 


A6 


B6 




A7 


B7 


XO (Operand Registers) 


XI 








. 





X7 



Words 



1 

2 

3 

4 

5 

6 

7 
10 
11 



17 



A central memory program can be easily relocated by moving the program in 
memory and resetting the reference address (RA) in the exchange jump area. 
All central processor references to central memory instructions or data are 
relative to the program's CM reference address. The RA and field length 
(FL) define the central memory limits of a program (RA plus FL). Field 
length is the total program length. The program address register (P) defines 
the location of a program step. Each reference to memory is made to the 
address specified by P + RA. In starting a program for the first time, the 
monitor provides the values for RA, FL, and P in the exchange area. 



t The ECS RA and FL are expressed in thousands (octal). 

"ft This applies only to machines equipped with the central processor 
exchange jump feature (CEJ) . 
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1.3 
FILES 



1.3.1 

ACTIVE FILES SCOPE is a file-oriented system: all information contained within the sys- 

tem is considered to be either a file or part of a file. Active files — those 
immediately available to the system at any moment — are defined to be any 
of the following: 

All jobs (each job is a file) waiting to be run. This set of files is 
called the job stack or input queue. 

Output files from jobs which have been run and are waiting to be dis- 
posed of by printing, punching, etc. 

Jobs (files) presently in some state of execution. 

Files currently being used by the jobs in execution. 

Common files, which maintain active status by specific request. 

Permanent files which are attached to a job 

The SCOPE operating system maintains a file name table (FNT) in central 
memory resident. This table contains one 3-word entry for each active file 
in the system. The first word identifies the file and contains other infor- 
mation about it. The 2nd and 3rd words which describe its status, are 
sometimes called a file status table or FST entry. When the user requests 
a file with a REQUEST control card or macro call or when he issues an I/O 
request referencing a file that does not exist, the SCOPE system creates an 
FNT entry for the file and assigns the file to a device. Thereafter, each 
time a user makes an I/O request, file status information is transmitted 
between the user's FET (section 3.2) and the FNT. 

The four types of active files are: input, local, output, and common. When 
a permanent file is attached to a job, it becomes a special kind of local file. 
As a job progresses, the job file goes through several type changes. 

When a job file is read from the card reader, it is copied onto mass storage 
and becomes an input file; it is not assigned to any control point. The file 
name is that name given on the job control card. The file name/status table 
contains a priority (from the control card) for the file which becomes the 
priority for the job. 
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When the job is assigned to a control point, the input file becomes a local 
file; and its name is changed to INPUT. The original name of the input file 
is saved in a word of the control point as the name of the job. New local 
files named OUTPUT, PUNCH, and PUNCHB will be established, if refer- 
enced, and given disposition codes of print, punch coded and punch binary, 
respectively. 

INPUT, OUTPUT, PUNCH and PUNCHB are all local files on mass storage. 
They are the immediate source of card input and the immediate destination 
of printer output and coded and binary card output. Because several jobs 
may run concurrently at different control points, several local files called 
INPUT, OUTPUT, PUNCH, and PUNCHB maybe in the file name/status 
table simultaneously. When a local file is sought in the table, both the name 
and the control point number are used to identify it. 

When a job terminates, the local file called INPUT for the assigned control 
point is released. Entries in the file name/status table for the local files 
called OUTPUT, PUNCH, and PUNCHB for that control point are altered so 
that their names are changed to the name of the job itself, which is found in 
the control point area. The control point is then released. 

Other local files can be created by the job. For instance, the first time a 
job references a file called RASP, the system consults the file name/status 
table entries for a local file of that name assigned to the job's control point. 
If one does not exist, a file is immediately created, initially consisting only 
of an end-of-information mark. This file is named RASP and entered into 
the file name/status table as a local file assigned to that control point. When 
the job terminates, all local files created in this manner are completely 
eliminated from the system. 

The fourth type of active file — the common file — is a local file for which 
active status is maintained by a control card request, so that the file does 
not disappear when the job originating it is terminated. 

Example : 

A job contains the control statement: 
COMMON RASP. 

If this control statement generates a local file called RASP, that file 
does not disappear when the job terminates. The entry in the file name/ 
status table for the local file RASP is altered so that it no longer belongs 
to any control point, and its type will be common. If RASP is assigned 
to a private disk pack, however, it will be preserved on the disk pack 
when the job terminates and the COMMON card will have no effect. 

An attempt to declare a permanent file COMMON is illegal. 
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It is assumed that the file name/status table did not already contain 
an entry for a common file called RASP. However, if it did contain 
such an entry, when a job is processed that contains the control state- 
ment COMMON RASP. , file RASP would be assigned to the control point 
of that job. RASP would then be available to that job just as if it were 
a local file. 

If a third job contained the control statement COMMON RASP, and if, 
when this card was processed, it was found that the common file RASP 
had been assigned to the control point of a running job, the earlier job 
would have to terminate and file RASP be detached from its control point 
before RASP would be available to the latest job. 

To eliminate a common file like RASP from the system, a job must contain 
the control statement COMMON RASP, and a later control statement: 

RELEASE RASP. 

When the latter control statement is processed, RASP is converted from a 
common file to a local file, but not otherwise altered. When the job is 
terminated, the local file RASP is destroyed. 



113.2 

LOGICAL RECORDS All files within the SCOPE system, regardless of type, are organized into 

logical records: for input files, through the ordering of control cards; for 
output files, through the language translator or other program producing 
the output; otherwise, logical record generation is up to the user. 

Since the logical record concept is defined for all devices, files may be 
transferred between devices without losing their structure. The physical 
format of a logical record is determined by the device on which the file 
resides. The physical record unit size (PRU) is the smallest amount of 
information that may be transferred during a single physical read or write 
operation for each device within the system. Logical records are written 
as one or more PRU's, the last of which is short or zero-length. A zero- 
length PRU is written if the logical record is an even multiple of the PRU size 
or if a write operation was requested with no data in the buffer. A zero- 
length PRU contains fewer bits than a CM word. 

Coded files on l/2-inch magnetic tape receive special treatment. Within the 
SCOPE system, all coded information is carried in display code; therefore, 
a conversion to external BCD must be made before writing on the tape. 
Translation is character-for-character. 
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The display code end-of-line mark (12 -bit zero byte) is converted to the 
external BCD characters 1632 g . The display code end-of-line mark is 
recognized only when it appears in the lower 12 bits of a central memory 
word. 

PRU Sizes (decimal) 

6638 disk 64 CM words 

6603 disk 64 CM words 

865 drum 64 CM words 

854 disk pack 64 CM words 

For magnetic tapes reference appendix I. 



LEVEL NUMBERS 



Related logical records within a file may be grouped by the user into an 
organized hierarchy. The level number (0-l7 g )t of a logical record is con- 
tained in the short or zero-length PRU which terminates the record. This 
PRU is the level mark. The level number is declared in the write request. 
If no number is specified, a level of is assigned. If, when no data is in 
the buffer, a level number is specified in a write request, a zero-length 
PRU containing the level number is written. A write end-of-file request 
causes a zero-length PRU of level 17 (logical end-of-file mark) to be 
written. A logical record of level 17 is always interpreted as a logical end- 
of-file, whether or not it is of zero length. The level mark appended to each 
logical record is not placed in the circular buffer when the file is read; but it 
is returned as part of the status information. 



* Level number 16 should not be used for a job which includes a request for 
a checkpoint dump as this level number is used in a unique way by the 
checkpoint dump program. 
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The lowest level within a file is associated with a single logical record. 
A higher level defines a set of records consisting of the logical record at 
that level plus all preceding records at a lower level. 

For instance, a file might be regarded as a multi-volume book; level 
would be equivalent to a page, level 1 to a chapter, and level 2 to a volume. 
In the following example, the lowest level is associated with a single 
logical record called a page; level 1 marks delimit a group of pages called 
chapters; chapters are grouped by level 2 marks into volumes. A reference 
to a logical record of level 1 includes all information between the referenced 
level 1 mark and the succeeding one. Included, therefore, will be several 
logical records as shown in the diagram. 



Logical Record 


Level Mark 


Page 


Chapter 


Volume 


1 





1 








2 


1 


2 


1 


I 




3 





3 




4 





4 


2 






5 


2 


5 








6 





6 








7 





7 


3 






8 


I 


8 








& 





9 




10 





10 








11 





11 


4 


II 




12 


1 


12 








13 





13 




14 


2 


14 


5 






15 





15 








16 


1 


16 


6 


III 




17 





17 




18 





18 


7 






19 


2 


19 








End of Information 

' 
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The format of the level mark varies depending on the device type on which 
file resides, as follows: 

Card Files 

Each logical record is terminated by a card with 7,8,9 punches in column 1. 
Columns 2 and 3 may have an octal integer, 00-17, to denote level number. 
Level zero is assumed in the absence of punches in columns 2 and 3. 

The end of information is signaled by a card with 6,7,8,9 punches in column 1, 
or with 7,8,9 punches in column 1 and 17 punched in columns 2 and 3. | 



Mass Storage Files and Binary Mode l/2-inch 
Magnetic Tape Files (SCOPE Standard) 

Each logical record is terminated by 8 characters (48 bits) as follows: 



binary zeros; reserved for future system use 



47 



level number, in binary 



If the last information in the logical record does not fit exactly into a physical 
record unit, the 8-character marker is appended to the last written PRU; 
otherwise, the marker is written as a single PRU of zero length. 



Coded Mode l/2-inch Magnetic Tape Files (SCOPE Standard) 
Each logical record is terminated by 8 characters as follows: 



blank; reserved for future system use 



47 



level number, in binary 



The level number is the low order 4 bits of the last character. The upper two 
bits of this character are always zero except for level zero where they are 
01 2 . For example, level five would be represented by 2020202020202005 in 
external BCD. Level zero would be represented by 2020202020202020 in 
external BCD. If the last information in the logical record does not fit exactly 
into a physical record unit, the 8-character marker is appended to the last 
written PRU; otherwise, the marker is written as a single PRU of zero-length. 
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1.4 

RANDOM ACCESS Random access files can be created on mass storage devices and their 

records can be read by direct addressing or sequential references. A disk 
address refers to pointers to system tables. When random file processing is 
requested, the disk address is returned when a logical record is written. A 
disk address is accepted from the user when a logical record is read. 

Generally, the disk addresses returned when the file is written are gathered 
into an index. SCOPE provides a routine (IORANDM) which automatically 
formats one of two types of indexes containing either named or numbered 
records. In either case, the first word is an indicator of the index type: 
+1 or -1. If the file contains only numbered records, sequencing of disk 
addresses in the index corresponds to the record numbering; the first 
address belongs to record one, the second to record two, and so on. The 
index need be only n + l words in length, where n is the maximum number of 
logical records in the file. The first word of such an index is set to + 1 the 
first time the file is written. 

If the file includes named records, the index contains a two-word entry for 
each record. The length of this index is 2n + 1 words. The first word of the 
index entry contains the record name, one to seven display code characters, 
left justified with zero fill. The second word of the entry contains the disk 
address of that record. If a given record has no name, the first word of its 
index entry contains zero, and the record must be accessed by its sequence 
number. The first word of a name index is set to -1 the first time the file is 
written . 

When a record is written with a name that already appears in the index, the 
new record is substituted for the existing record. When a record is written 
with a name that does not appear in the index, IORANDM places the new name 
in the index at the lowest unoccupied position and assigns the number of that 
position to the record. When there is no space in the index for a new name, 
the request is rejected and index full status is returned. 

When a record is written by number and the records for that file can be 
named, the name is not disturbed. 

Other forms of indexes may be defined with a central processor subroutine 
which sets fields in the file environment table (FET) and locates the records 
within the index. 

When files contain many logical records, multiple levels of indexes can be 
defined to conserve central memory space. When a multi-index file is 
written, logical record disk addresses are directed to a subindex buffer. 
When the buffer becomes full, the subindex itself can be written as a logical 
record in the file: the subindex disk address is directed to a main, or 
primary, index. The forms of the primary and subindexes can be that 
supplied by IORANDM or by a user-supplied routine. They need not be the 
same type. 
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the user should close 
the end of the file the 



Random files which are to endure between runs in a job or between jobs 
should be assigned to private disk packs, declared as common files or 
cataloged as permanent files. At the end of a run which creates such a file, 
the file. The system then automatically appends to 
contents of the index buffer specified in the FET. 
When the file is to be read, the user must open the file with an index area 
specified in the FET. The system then reads the index record into the 
specified area. 



1.5 

FILE LABELS SCOPE system file labels are defined for files recorded on 1/2-inch mag- 

netic tape only. The labels are described and designed to conform to the 
Proposed USA Standard. Working Paper Magnetic Tape Labels and File 
Structure for Information Interchange , produced by ISO, the International 
Organization for Standardization, Technical Committee ISO/TC 97, Sub- 
Committee 2. In addition to the standard SCOPE labels, an installation may 
optionally choose to process tapes with a label format identical to that used 
by Control Data 3000 series computers (Appendix C). 

Tapes containing a system label (or optionally a 3000 series label) are 
recognized as labeled tapes. All other tapes are considered unlabeled. 
Label processing is not provided for unlabeled tapes. SCOPE system labels 
are recorded at 556 bpi (or at a value set by an installation parameter) . 
Control Data 3000 series labels are recorded at the same density as the file. 

All system labels are 80 characters. Labeled tapes are checked by the 
system for file name, reel number, creation date, expiration date, and 
edition number. Labeled tapes are protected from accidental destruction by 
checking the creation and release dates in the file header label. This label 
is delivered to the circular buffer for an input file, so that the program may 
check it further as required. Unless the user process (UP) bit is set in the 
FET, reel swapping for a multi-reel tape file is automatic. The system 
executes two function, calls: CLOSER UNLOAD and OPEN REEL. Since 
these calls are issued by the system, the file header label is delivered in the 
FET for the first reel only. 
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The following terms are defined in conjunction with the SCOPE system file 
labels. 

Volume : Synonymous with reel of magnetic tape. 

Volume Set: A collection of related volumes in which one or more files are 
recorded. A volume set may consist of: 

A single volume containing one file 

A single volume containing several files 

Several consecutive volumes containing one file 

Several consecutive volumes containing several files 

Tape Mark: A one-character record, 17 g , plus check character recorded 
in even parity. The tape mark separates label information from file 
information. 



The first four characters of labels identify the type. 



Type 


Identifier 


Volume header label 


VOL1 


Volume trailer label 


EOV1 


File header label 


HDR1 


File trailer label 


EOF1 


Device header label 


DEVI 



Label formats are described in Appendix C. 



1.5.1 

TAPE FILE STRUCTURE SCOPE standard system labels and tape marks establish the tape file structure 

according to the following rules. Required labels are indicated by a 4-char- 
acter identifier, and tape marks are indicated by asterisks. 



Single -Reel File 

VOL1 HDR1*. . .Data Blocks. . .* EOF!** 

Multi-Reel File 

VOL1 HDR1*. . . First Volume Data. . . * EOV1** 
VOL1 HDR1*. . . Last Volume Data. . . * EOF1** 
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Multi-File Reel 

V0L1 HDRl*...File A...*EOFl* HDRl*...File B...*EOFl** 

Multi-Reel Multi-File 

VOU HDRl*...File A. . .* EOF1 * HDRl*...File B...* EOV1** 

VOL1 HDR1*. . . Continuation of File B * EOV1** 

VOL1 HDR1*. . . Last of File B. . . * EOF1* HDR1*. . . File C. . . * EOF1** 

Volume Header Label 

The first PRU in the volume must be a volume header label; it may not 
appear elsewhere. 

File Header Label 

Every file must be preceded by a file header label and every file header 
must be preceded by a tape mark or a volume header label. When a 
volume ends within a file, the continuation of that file iri the next volume 
must also be preceded by a file header. 

File Trailer Label 

A file trailer label is required as the last block of every file . A file 
trailer must be preceded and followed by a tape mark, and if it is the 
last file trailer in the volume, two following tapemarks are required. 

Volume Trailer Label 

When a volume ends within a file, the last PRU of the file in that volume 
must be followed by a volume trailer label which must be preceded and 
followed by tape marks. 

When end-of-volume and end-of-file coincide the labeling configuration is one 
of the following (* indicates tape mark) : 

...File A...* EOV1* * 

VOL1 HDR1* * EOF1 * HDR1*. . . File B. . . 
(A) (A) (B) 

. . . File A. . . * EOF1 * HDR1* * EOV1* * 

VOL1 HDRl*...File B. . . 
(B) 
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1.5.2 

DISK PACK 

FILE STRUCTURE An 854 disk pack is organized into 2000 10 record blocks of five PBU's each. 

Every RB fills a single track of the disk pack; its logical number is lOa+b, 
where a is the cylinder number and b the head group number. Of the 16 
sectors physically available on a track, the last (number 15) is unused; the 
remainder are grouped into PRU's as follows: 



PRU 


Sectors 





0, 1, and 2 


1 


6,7, and 8 


2 


12, 13, and 14 


3 


3, 4, and 5 


4 


9, 10, and 11 



Two revolutions are required to read PRU's in sequence in a record block. 

Disk pack use can be either public or private. H public, it is available to 
the system for writing and reading files on the same basis as a large disk 
unit of the non-removable type. If private, it provides space for up to 63 
files, none of which are permitted to overflow to another storage device. 
When a private pack is assigned to a job (in response to an RPACK control 
card) , the names of the files it contains are read from the first three record 
blocks into CMR, along with the record block reservation table (RBR) and 
record block table (RBT) chains needed to access the files. When the job 
terminates, these tables are written back onto the pack before it is logically 
unloaded. 

The first PRU of a disk pack contains its label, formatted as follows: 
Character 



Positions 


Description 


1-4 


DEVI 


5 


Binary zero 


6-10 


Julian date (yyddd in display code) 


11-20 


Visual number/identifier, right justified 




with display code zero padding 


21-30 


Binary zero 


31-38 


Binary zero if public device ; pack name , 



justified with binary zero fill, if private 
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Character 

Positions Description 

39-40 Binary zero if public; binary count of files on pack 

if private 

41-78 Binary zero 

79-80 Checksum of all other 12-bit bytes of PRU 

81-460 RBR table 

461-640 Binary zero 

If the pack is public, the rest of the first record block cannot be used, and 
usable space begins with the second record block (number 1). 

If the pack is private, file names and RBT chains are stored in the rest of 
the first record block and may extend through the second and third; usable 
space begins with the fourth (number 3). 

Files on a private pack can be accessed only by the job to which it is 
assigned. Private pack files can be only type local (not common or output) 
and must have zero disposition codes. 
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JOB PROCESSING 



A job consists of one file of punch cards or card images. The first logical 
record of a job file consists of the control cards which identify the programs 
and data files and control the sequence of program executions (runs). Con- 
trol cards specify how the job is to be processed; they determine all operations 
performed on subsequent logical records of the job file. 



2.1 

JOB FLOW SCOPE begins processing by reading the job card. It copies the job file on 

mass storage and adds the name of the job to the list of input files. 

When a control point is available for the job and the required amount of 
memory is free, the job is brought to the control point through the following 
steps: 

• Memory is allocated; jobs already in the computer may be moved in 
central memory. 

• The first record (or part thereof) of the job deck (control card 
record) is copied into the control statement buffer of the control 
point, and a pointer is initialized to indicate the first control card. 

• The name of the job file is changed to INPUT and the file is positioned | 
to the beginning of the second record. 

• The first control statement in the buffer is executed, and the pointer 
moves to the next control statement. This begins the first run within 
the job. When that run is completed, the next control statement is 
executed, beginning the second run. When control statements are 
depleted, the job is terminated. Control cards are written in the job 
dayfile as they are executed. 

Each job must begin with a job card and end with a file separator card. All 
control cards must appear between the job card and the first record separator. 
The end of the control cards is signified by a 7,8,9 punch card (end-of- 
record) or a 6,7,8,9 punch card (end-of- information) if the job consists of 
control cards only. 
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2.2 

CONTROL CARDS Control cards have two fields. The first contains the flag word starting in. 

the first non-blank column. Flag words described in this section are re- 
served for the system and may not be used as a name or a program call card. 
All cards with a flag word not recognized by SCOPE are treated as program 
call cards. 

The second field is optional; it may contain one or more parameters, sepa- 
rated by any character that is not alphanumeric, not a blank nor an asterisk. 
The two fields are separated by any character that is not alphanumeric nor an 
asterisk. The parameter field is terminated by a period or right parenthesis 
and a terminator must be present even when no parameters are specified. 
All blanks are ignored in the parameter field. Comments may appear to the 
right of the terminator. Characters in the range of 1 to 44 in display codes 
(A-Z and 0-9) are considered alphanumeric. 

JOB CARD n, Tt, CMfl, ECfl, Pp. t 

The first control card of a job must indicate the job name, priority, central 
processor time limit, and memory requirements. Fields are separated by 
commas and the last field is terminated by a period. Blanks are ignored in 
a job card. Fields other than n may appear in any order as they are identi- 
fied by leading characters indicated above by capital letters. 

n Alphanumeric job name (1-7 characters) ; must begin with a letter. 

To assure unique job names, SCOPE replaces the last two characters 
with a system generated value. If only a job name is specified, 
installation-declared values are assumed for the remaining fields. 

Tt t central processor time limit for the job in seconds; a maximum of 

5 octal digits.. Time limit must suffice for the whole job including 
all compilation and execution. Value may not exceed 
32767 10 (77777 g ). The value of 32767 10 defines an infinite time: 
no time limit check is performed in this case. 

CMfl fl = total central memory field length of the job; a maximum of 6 

octal digits . The field length (storage requirement) is rounded up to 
a multiple of 100 g by the system. 

ECfl fl = total extended core storage field length given as the number of 
1000 8 -word blocks required. Value may not exceed 7777 8 . 

Pp p = priority level, in octal, at which job enters the system. 

l<p< 2 k -l; k is an installation option =£ 8; 1 is the lowest priority. 

tCompatibility with job card formats used by previous systems may be 
obtained at installation option. 
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SWITCH CARD 



SWITCH, n. 



At the beginning of a job pseudo sense switches 1-6 are. set to off. Settings 
may be changed and preserved at the control point for reference by a subse- 
quent program within the same job. Each use of the SWITCH.n. card changes 
the current status of the specified switch. For example the first SWITCH.4. 
card will turn that switch on, the second SWITCH, 4. card will turn it off. 
Switches also may be changed by console commands OFFSW and ONSW. 



MODE CARD 



MODE,n. 



MODE is used to select exit or stop conditions for a central processor pro- 
gram. The exit selections (n) are loaded into the exchange jump package. 
Upon an exchange jump, the selections are stored in the central processor 
and the exit occurs as soon as the selected condition is sensed. The exit 
mode is set to 7, if not otherwise specified. 

n value Exit Condition 

Disable exit mode - no selections made 

1 Address is out of range because of: 

Attempt was made to reference central memory or 
extended core storage outside established limits 

Word count in extended core storage communication 
instruction is negative 



2 Operand out of range, floating point arithmetic unit received 
an infinite operand. 

3 Address or operand is out of range. 

4 Indefinite operand, floating point arithmetic unit attempted 
to use an indefinite operand. 

5 Indefinite operand or address is out of range. 

6 Indefinite operand or operand is out of range. 

7 indefinite operand or operand is out of range or address is out 
of range. 



Example: 

MODE, 3. 



Selects address out of range or 
operand out of range as stop conditions. 



A mode zero error may occur if the program jumps to relative location zero. 
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CKP CARD 



CKP. 



CKP causes a checkpoint dump to be taken of all files currently active at 
the control point. The effect is identical to that of the CHECKPT macro 
call (section 8.1), except that no parameters can be specified. 



RESTART REQUEST 



A job may be restarted from its checkpoint tape by the RESTART control 
card. Section 8.2 describes the five possible card formats. 



COMMENT CARD 



COMMENT, comments 

The period must appear in this card. Characters following the period 
through column 80 are entered into the dayfile and displayed. The speed 
at which control cards are processed by SCOPE may prevent the comment 
from being noticed by the operator. The COMMENT card does not halt job 
processing. 



EXIT CARD 



EXIT. 



The EXIT card can be used to separate the control cards for normal execution 
from a group of control cards to be executed in event of error exit as listed 
below : 



Error 


Flag 


Condition 


(octal) 




1 




Time expired 


2 




Arithmetic error 


3 




PPU abort 


4 




CPU abort 


5 




PP call error 


6 




Operator drop 


7 




Kill 



Job has used all CP time it requested; 
any further attempts to use CPwill 
cause termination. 

CP error exit has occurred. 

PP has encountered an illegal request 
such as illegal file name or request to 
write outside the job field length. 

Central program has requested that 
the job be terminated. 

Monitor has encountered a PP call 
error entered in RA+1 by a central 
program . 

Operator requested job to be dropped. 

Set by operator or PP program to 
drop a job and inhibit all output. 
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Error Flag 
(octal) 

10 



11 
12 
13 
14 

15 



Condition 



Rerun 



Set by operator to force job back 
into the input queue. 



16 



Control card error 
ECS parity error 
Job card error 
Job pre -abort 

Auto -recall error 



Job loop in 
auto -recall 



Job not read correctly (e.g. , check- 
sum error discovered by JANUS) . 

Job entered auto -recall with 
completion bit set. 

No activity exists for a job in auto- 
recall, and completion bit is not set. 



Conditions 3 and 5 can occur if a program accidentally writes in 
RA+1. 

If no error condition occurs but an EXIT or EXIT(S) (section 4. 7) control 
card is encountered, the job will terminate. If error condition 7, 10, 13, 
or 14 occurs the job will terminate. If error condition 11 occurs or if a 
user tries to load the output from a bad assembly or compilation, a search 
is made for an EXIT(S) control card. If the search is not successful, the job 
terminates; otherwise the error flag is reset and the control cards following 
the EXIT(S) card are processed. Any of the other error conditions (1,2,3, 
4,5,6,12,15,16) result in a search for either EXIT or EXIT(S) control card. 
If encountered the card is written to the job dayfile and the control cards 
following it are processed. 



Example : 



MYJOB,P1,T400,CM50000. 

REQUEST, TAPE5. 

RUN. 

EXIT. 

DMP. 

DMP.1000. 

7-8-9 

(program) 

7-8-9 

(data) 

6-7-8-9 



Job card 

Request scratch tape 

Compile and execute 

Dump exchange package 

Dump first 1000„ words of storage 

Record separator 

Record separator 

End of information 



Dumps are made only when an error condition occurs. 
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LOADER CARD 



LOADER (name) 

In a SCOPE system containing more than one loader, this card selects a 
loader for the job in execution. Name is 1-7 alphanumeric characters 
chosen from a prescribed list (currently PPLOADR and CPLOADR). 

The primary operations of PPLOADR (text relocation and loader table 
building) are performed in the PP. The primary operations of CPLOADR 
are performed in the CP. 

When this control card is omitted from a job, or if no name is given, the 
system selects a loader by default. The default option is defined by a system 
installation parameter. An unrecognized name produces a dayfile message 
and the job is terminated. 

Four control cards that relate directly to the loader are discussed in the 
next section: LOAD, EXECUTE, program-call-card, and NOGO. Each of 
these control cards is processed by either loader in the same way. 



2.3 

PROGRAM 

EXECUTION 



These control cards are used to load and execute files. The SCOPE control 
card format described below pertains to the EXECUTE and program call 
cards. All numbers used are decimal. The card may be a unit record of up 
to 80 characters including freely interspersed blanks. The general SCOPE 
format is: 



Name 



List 



Comment 



Name and list are required fields; comment is optional. Name is a string 
of one to seven alphanumeric characters beginning with a letter. Comment 
is a string of Hollerith characters composed from the set defined in 
Appendix A. 

List contains parameters to be used by the function or program being executed. 
The contents of list depend upon the specific program. If parameters are not 
required, list is simply a period. Parameters may be enclosed in parentheses 
or preceded by a comma and concluded by a period. 
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LOAD CARD 



LOAD (lfn) 



EXECUTE CARD 



This card directs the system to load the file named lfn into central memory. 
If lfn is INPUT, loading begins from the current position of the file. All 
other files are rewound by the system prior to loading. Loading terminates 
when the end-of-information or an empty record is encountered. All loader 
directives must appear in the named file before any subprogram. These 
directives specify whether overlay, segment, and section processing is 
required. Overlays, segments, and relocatable binary decks may be loaded 
with the LOAD control card. The first record of the file lfn specifies the kind 
of loading operations to be performed. 

If subprograms are to be loaded from more than one file, more than one 
LOAD card is needed; but the first record of the first file always determines 
the kind of loading for all subsequent LOAD cards. 



EXECUTE (name.p ,p , 



• P n> 



Name is the entry point of the program to be executed once loading is com- 
pleted. If name is absent, the last transfer address (XFER, appendix D) 
encountered is used. The parameters p. are passed to the program to be 
executed. 

The EXECUTE card causes completion of loading. This process includes 
filling out all unsatisfied references with entry points in relocatable routines 
from the system library except where inhibited by segment parameters. 

For segment or overlay operations, program execution begins in the first seg- 
ment or the main overlay. Subsequent segments or overlays must be loaded 
by user calls from these programs. 



PROGRAM 
CALL CARD 



name (P^Pg P n ) 

Initially, the file name/status table is searched for this name. If found, sub- 
programs are loaded from the named file, bypassing with a message on 
OUTPUT, any routines already loaded by LOAD cards. The file is rewound 
before loading. If name does not appear in FNT/FST, the system library is 
searched and matching subprograms are loaded. Loading is completed; if no 
fatal errors are found, execution begins at the specified name. The parameters 
p. are passed to the program to execute. 



Example: LOAD (BTGN) 
EXECUTE. 



= BTGN. 
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To replace one subprogram with a subprogram of the same name from 
another file, a possible sequence is: LOAD (H0045) 

LAU36. 

The subprograms will be loaded from the file H0045 and those of the same 
name on LAU36 will be bypassed. 



NOGO CARD NOGQ. 

When NOGO is encountered, the loader processes the loaded program in the 
same manner as for an EXECUTE card; however, the program is not exe- 
cuted. This card permits mapping a program, bypassing execution, and 
continuing other portions of the job. 



REDUCE CARD REDUCE. 

When the REDUCE card is encountered, a flag is set for the loader. After 
loading and just prior to execution, the field length is reduced to the highest 
word address loaded (or the top of blank common) rounded up to the next 
100 (octal). The field length remains reduced until the end of the job or 
until an RFL card is encountered. The REDUCE card is not honored if an 
external reference is made to LOADER. The REDUCE card may be positioned 
anywhere before the EXECUTE or PROGRAM CALL card. Any succeeding 
runs that require a larger field length will be terminated unless an RFL card 
is used to increase the field length. 



Example : 



LOAD (FAT) 

REDUCE. 

EXECUTE. 

RFL(60«00) 

LOAD(FAT) 

REDUCE. 

LOAD(NOTFAT) 

NOTFAT. 



Load large program 

Field length will be reduced 
Increase field length for next load 



Load more 

Field length reduced again 
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MAP CONTROL 
CARDS 



Any of the three MAP cards may appear prior to an EXECUTE or PROGRAM 
CALL card. The MAP option selected by a MAP control card prevails until 
end -of -job, or until changed by another MAP control card. 

Default, as defined by installation parameter, prevails when a MAP control 
card does not appear. The default option may be set by installation parameter 
to be any one of the three options described below: 



MAP(ON) 

When this card is used, a map is produced after loading is completed. Pro- 
grams loaded from the system library as a result of explicit control card 
calls, such as RUN, COMPASS, etc, do not appear in the map. 



MAP(OFF) 
When this card appears, no map is produced after loading is completed. 



MAP(PART) 

This card is used to produce a partial map after loading is completed. The 
partial map is identical to that produced by MAP(ON) except that entry 
addresses are omitted. 



2.4 

EQUIPMENT 

ASSIGNMENT 



if a file is not specifically assigned by a REQUEST card or function, the 
system assigns that file to mass storage. A job need not assign the card 
reader, printer or punch for normal input/output, as this is done auto- 
matically by the system. In addition, certain files with special names 
(OUTPUT, PUNCH or PUNCHB) will always be processed by the system 
when the job is completed. 

A REQUEST card or function must be given to assign a file directly to a 
private device. The device assigned to the requesting control point becomes 
the private source or destination of files for that job. As job control cards 
are processed in order, required private equipment assignments must pre- 
cede any reference to the corresponding file. 
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REQUEST CARD REQUEST, lfn,dt,dc,x,y,eq. 



This card declares properties of a file and requests assignment of a physical 
unit. Assignment may be automatic or may require operator action; and it 
may be to a specific mass storage unit by EST ordinal, or to any available 
mass storage unit by equipment type and allocation style. Assignment of a 
file to other than a mass storage device requires a REQUEST card or function. 

Because the control cards of a job are processed in order, equipment assign- 
ments must be made before the file is referenced. A REQUEST card must 
have at least one parameter, and the first parameter is assumed to be lfn; 
all other parameters may appear in any order. Successive blanks, commas, 
periods, left or right parentheses are ignored. If a parameter is listed more 
than once or is in error, a message is issued and the job is terminated. 

lfn Logical file name (1-7 digits or letters beginning with a letter), 

specifies name of the file to which equipment is to be assigned 
and the name by which the user refers to the file. 

dt Designates type of device to which file is to be assigned. 

When dt is specified, the operator must assign the proper 
type of device; otherwise any equipment may be assigned by 
the operator, dt may take the following forms: 

hh Hardware type mnemonic from the basic file 

environment table (section 3.2.1). In addition, 
A* may be used for mass storage if the user is 
not concerned as to which mass storage device is 
assigned. For mass storage, hh is equivalent to 
hhaa with aa =00. The hh specification requests 
the operator to assign a device of the specified 
hardware type. No other hardware type assign- 
ment will be accepted. 

hhaa Designates a mass storage device where hh is as 
above and aa is an optional allocation style code 
(two octal digits) as listed in section 3.2.1. The 
operator must assign a mass storage device of the 
specified hardware type and allocation style; no 
other hardware type or style will be accepted. 
By using A*aa, the user indicates any mass 
storage hardware type with the aa allocation style. 

*hhaa Same as for hhaa, except that no operator inter- 
vention is required. When *A* is used, the sys- 
tem will assign any mass storage hardware type 
with the allocation style aa. 

*hh Same as for hh, except that no operator inter- 

vention is required. 
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Dnnnn Meaningful only for mass storage , nnnn is 
equivalent to the combination, ddaa, corre- 
sponding to a hardware type mnemonic and 
allocation style under the specification hhaa. 
dd is the octal device type code corresponding 
to hh. 

PK Valid only for private disk packs. The format 

of the request card must be REQUEST, lfn, 
PK, pname; where pname is the name of the 
private pack already assigned by the operator 
in response to an RPACK control card. This 
form of request card does not cause a halt for 
operator assignment; the assignment is made 
automatically. If no pname is assigned to the 
job, a dayfile message is issued and the job is 
terminated. 

LO 1/2" magnetic tape at density 200 bpi 

HI 1/2" magnetic tape at density 556 bpi 

HY 1/2" magnetic tape at density 800 bpi 

MT 1/2" magnetic tape at installation default density 

When the equipment type is MT and the tape has SCOPE 
system labels, input tape is read at density specified in 
volume header label. Output tape is written at density 
specified by an installation parameter. For unlabeled 
tape , a density specified by an installation parameter is 
used. 

zhh z has significance only for MT, LO, HI and HY. 

When z = 2, two 1/2 -inch magnetic tape units are 
requested, and they are used in the order 
assigned by the operator. When the tape on the 
first unit reaches end-of-reel, the system begins 
processing the tape on the second unit while the 
tape on the first unit is rewound and unloaded. 
When the tape on the second unit reaches end-of- 
reel, the system returns to the first unit which 
should have been mounted with a new tape in 
the interim. The tape on the second unit is re- 
wound and unloaded. This alternating process is 
repeated as long as the file is referenced. When 
z = 1 or absent, and an end-of-reel occurs, the 
system rewinds and unloads the unit and waits 
for the unit to become ready. 
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Example : 

REQUEST, TAPE1,2MT. 

Requests two tape units for file TAPE1 

REQUEST, TAPE1,AA02. 

Requests operator assign 6603-1 disk, outer zone for file TAPE1 

REQUEST, TAPE1,*AP. 

System will assign first available public disk pack to file TAPE1 

REQUEST, TAPE1,*A*01. 

System will assign first available mass storage unit that contains 
allocation style 01 (50 PRU's per assignable unit) 

dc Disposition code. Optional properties of a file may be de- 

clared by the disposition code. The following mutually 
exclusive values are permitted; CK and MF may be used 
only for magnetic tape; all others apply only to files on 
allocatable devices, and disposition will be ignored if they 
are used for files on other than allocatable devices , such 
as tapes. 

CK Identifies checkpoint dump file. 

MF Identifies a multi-file tape (section 3.2.1). 

The lfn must be six characters or less. 

P8 Punch file at job completion; 80 columns are 

punched with no formatting of the card. 

PR Print file on any printer at job completion; 

automatically assigned to the file named 
OUTPUT. 

PI Print file on 501 or 505 printer at job completion. 

P2 Print file on 512 printer at job completion. 

PU Punch coded file at job completion; automatically 

assigned to the file named PUNCH. 

PB Punch binary file at job completion; automatically 

assigned to the file named PUNCHB. 

FR Print on microfilm recorder at job completion; 

automatically assigned to the file named 
FILM PR (Driver not provided. ) 
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FL Plot on microfilm recorder at job completion; 

automatically assigned to the file named FILMPL 
(Driver not provided.) 

PT Plot at job completion; automatically assigned to 

the file named PLOT (Driver not provided) . 

HR Print on hard copy device at job completion ; 

automatically assigned to the file named HARD PR 
(Driver not provided) . 

HL Plot on hard copy device at job completion; 

automatically assigned to the file named 
H ARDPL (Driver not provided) . 

x,y These two fields describe the data format conventions and the 

labeling conventions for magnetic tape files. If the fields are 
omitted and the file is declared to be magnetic tape, the file is 
assumed to be in standard SCOPE data format with no labels. 
Any one of the optional data formats described below may be 
declared in either field; any one of the label declarations may 
be placed in the other, except no label format may be speci- 
fied with the X data format. More than one data format 
declaration or more than one label declaration is considered 
an error; a message will be given and the job will be terminated. 

Data Formats (see Appendix I) 

blank SCOPE standard 

X External - SCOPE 2.0 compatible 

S Stranger tape 

L Long record stranger tape 

Label Formats 

absent Unlabeled 

E or N SCOPE standard labels (E and N are equivalent) 

Y 3000 (or installation defined) label 

eq Specific device. The eq option is available for use in an en- 

vironment where the user has control over equipment assign- 
ment (such as in an open shop) . It is not recommended for 
use otherwise, eq is one or two octal digits specifying an 
ordinal in the equipment status table (EST). The system will 
assign the named file to the specific device without operator 
intervention. If the equipment is unavailable, the operator 
is notified; the request is reprocessed until the equipment 
becomes available or the operator terminates the job. The 
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eq option may be used in combination with the hhaa option, 
in which, case SCOPE verifies that the specific equipment 
satisfies the device type and allocation style specification. 

RPACK CARD RPACK, pname, N. RPACK, pname, E. RPACK, pname, E, vrno. 

This card directs the operator to assign a private disk pack named pname. 
This is not the name of any file associated with the pack, though the pack 
and one of its files may, by coincidence, have identical names. 

If the second parameter is N, the operator must assign a pack that is 
already blank labeled. When he does so, the message TYPE IN VISUAL 
PACK NUMBER will appear, and the operator types n. VRN.xxxxxx. where 
xxxxxx is the number or other identification of the physical pack. Then the 
pack is assigned to the job as a private pack not yet containing any files; a 
label, containing the pack name and visual number, is written immediately 
on its first PRU. 

If the second parameter is E, the operator must assign a pack that is already 
labeled as a private pack with the name pname. If the third parameter, 
vrno, appears on the card, it must match the visual identification in the 
pack label. K the pack assigned by the operator fails either test, the opera- 
tor is informed and the job waits until another unit is assigned or the job is 
dropped. When a pack passes the tests, its files are made available to the 
job, and other files can be added to it by REQUEST cards. 

Examples for RPACK and REQUEST card: 

1. JOB1 creates two files TAPE1 and TAPE2 to reside on a private 
disk pack named MYPACK with visual ID of N1122. 

JOB1.T1000. 

RUN(S) 

COMMENT. THE OPERATOR SHOULD ASSIGN A BLANK 

COMMENT. LABELED PRIVATE PACK AND HE SHOULD 

COMMENT. TYPE IN A VRN OF N1122 TO THE FOLLOWING 

COMMENT. RPACK REQUEST 

RPACK, MYPACK, N. 

REQUEST, TAPE1.PK, MYPACK. AUTOMATIC SYSTEM 

ASSIGNMENT 
REQUEST, TAPE2, PK, MYPACK. AUTOMATIC SYSTEM 



ASSIGNMENT 



LGO. 

7-8-9 

FORTRAN PROGRAM TO CREATE 
FILES TAPE1 AND TAPE2 

7-8-9 

6-7-8-9 
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JOB2 reads the two files previously created by JOB1 and creates 
a third file TAPE 3 on the private pack. 

JOB2.T1000. 

RUN(S) 

COMMENT. THE OPERATOR MUST ASSIGN PRIVATE PACK 

COMMENT. WITH VISUAL ID N1122 TO FOLLOWING RPACK 

COMMENT. REQUEST 

RPACK, MYPACK,E,N1122. 

REQUEST, TAPE3, PK, MYPACK. 

LGO. 

7-8-9 

FORTRAN PROGRAM TO READ 

FILES TAPE1 AND TAPE 2 AND 

CREATE A THIRD FILE TAPE3 
7-8-9 
6-7-8-9 



REMOVE CARD REMOVE, lfn. REMOVE, lfn, pname. 

This card requires no operator action. It removes the file named lfn from 
the File Name Table provided it is assigned to a private disk pack. All its 
disk space is released, and its name will not appear in the label written on 
the pack at the conclusion of the job. If parameter pname appears on the 
control card, a check will determine that this is the name of the pack con- 
taining file lfn. 

Example : 

JOB3 removes the file TAPE2 from private disk pack named 
MYPACK with visual ID of N1122. 

JOB3.T1000. 

RPACK, MYPACK, E, N1122 . 

REMOVE, TAPE2, MYPACK. 

7-8-9 
6-7-8-9 



COMMON CARD COMMON, lfn. 

H the file name, lfn, is type common in the file name table (FNT) and is not 
being used by another job, it is assigned to the current job until it is returned 
or unloaded or until job termination. E the file's status is not common or if 
it is being used by another job, this job must wait until the file is available. 
A job which uses a common file is marked by the system as being unable to 
be rerun. 
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If the file name, lfn, already appears as a local file name for the job, the 
file will be assigned common status in the FNT and becomes available to any 
succeeding job after the current job terminates. However, if a common file 
of the same name already exists, the COMMON card will be rejected. 

If the file named on the COMMON card does not appear in the FNT , an 
operator message is displayed, and the job must wait until the file appears 
and is available. 

If the file resides on a non-allocatable device such as magnetic tape, the 
equipment will be logically turned OFF until the common file is released. 

If the file resides on a private disk pack, the COMMON card has no effect, 
but a diagnostic is issued. 



RELEASE CARD 



RELEASE, lfn. 



With the RELEASE control card, the common file named lfn currently 
assigned to this job is dropped from common status and assigned local 
status in the FNT. The file is released at the end of the job. 



RETURN 



RETURN, lfn, , lfn, lfn . 

12 n 

When the RETURN card appears, a CLOSE, UNLOAD is performed on each 
file named. Files and equipments are returned to the system for subsequent 
processing (section 3.6.1). 
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OBJECT PROGRAM-SYSTEM COMMUNICATION 



The control cards direct the SCOPE system to initiate and terminate user 
programs. SCOPE also supervises user program runs, controlling all 
input/output operations and providing program-system interface. 

These run-time functions are performed by system subroutines called by the 
user in the text of his program. A comprehensive set of system macros is 
available for calling subroutines and generating the tables for passing param- 
eters between the system components. System subroutines and communication 
tables reside in the user's field length and should, therefore, be considered 
when specifying field length. 

During a user program run, the system performs two types of operations: 

• Input/ output operations , initiated by file action requests in the 
user program 

• System operations , initiated by system action requests 

Both file and system requests call the Central Program Control subroutine 
(CPC) which provides linkage with the monitor. Before CPC can honor a 
file action request, the File Environment Table (FET) must have been 
established for the file to be processed. 

3.1 

FILE NAME 

TABLE The File Name Table (FNT) is a system table containing a three-word entry 

for every active file in the system. It provides a link between the user's 
FET and the system input/output routines. The FNT is protected from user 
access, as it resides in low core and is outside the field length of user jobs. 

The following information is contained in each FNT entry. 

FILE NAME 

The name of the file. If the file is created by OPEN, REQUEST, or CIO 
calls, the name must be 1-7 alphanumeric characters beginning with a letter, 
and it cannot include embedded blanks. Otherwise, the file may be any 42-bit 
quantity in which the high-order 12-bits are not all zeros. 
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FILE TY PE 

A number which identifies the file type: input, output, local, or common. 



CONTROL POINT NUMBER 

The control point to which the file is assigned. If a file is associated with a 
job running at a control point, it is assigned to that control point. Otherwise 
it is assigned to control point zero. 

Files of type input are always assigned to control point zero. Each input file 
must have a unique name. Each file assigned to any control point other than 
zero must have a name which is unique among files at that control point. 
Local files at control point zero need not have unique names. Each common 
file must have a name unique among all common files regardless of control 
point. 



EQUIPMENT TYPE 

A number which specifies the type of device or equipment on which the file 
resides. This could be a mass storage device such as drum, disk, or disk 
pack; or it could be a sequentially accessible equipment such as magnetic tape, 
line printer, card reader, or card punch. Most mass storage devices are 
called allocatable, since portions of the device can be allocated to different 
jobs. Sequential access devices are non-allocatable. A private disk pack is 
a non-allocatable mass storage device. 

The system enters the equipment type in the FNT when the file is created. If 
the user creates the file with a REQUEST control card or macro, he can 
specify the type of device. If the file is created when the user issues an I/O 
function for a non-existent file, the allocatable device with the most available 
space is selected. The user can specify allocation style in his FET which can 
help determine the device; but he cannot specify the device itself. The device 
type field in the FET consists of 6 bits for the allocation style and 6 bits for 
the hardware device type. Each time a user requests an I/O function, the 
device type from the FNT is placed in the hardware device type field in the 
user's FET and the allocation style is set in his FET. However, if the 6-bit 
hardware device type field in the user's FET indicates a non-allocatable 
device when he is opening a non-existent file, the job is terminated. The 
value of the hardware device type in the FET is ignored in any other case. 
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LAST CODE AND STATUS 

To perform an I/O operation, the user must set a code in the code and status 
field of his FET. If he uses a system macro, this will be done automatically. 
When the system starts to process the I/O request, it stores the code and 
status from the FET in the FNT. When the I/O operation is complete, the sys- 
tem stores status information in the FNT code and status field, and also sets 
the completion bit (bit of field) . The FNT code and status is then copied to 
the FET. If an end-of-record or end-of-file status was returned on the last 
READ, the user must clear these bits before the next READ is issued; other- 
wise CPC will not honor the next READ action requested. 



SECURITY CODE 



This code indicates whether the file is currently open or closed; and if open, 
the code indicates whether it is open for READ, WRITE or ALTER. 



PERMISSIONS 



To perform certain operations on a permanent file, a user must first obtain 
permission. For example, to write on a permanent file the user must have 
either EXTEND or MODIFY permission. The current file permission is kept 
in the FNT. 



DISPOSITION CODE 

When it is time to dispose of a file, this code indicates the action to be taken. 
Normally, files with non-zero disposition are placed in the output queue. 
JANUS will pick up files from the output queue having disposition codes 
between 10s and 47s; other disposition codes indicate EXPORT/IMPORT and 
RESPOND files. In addition, the system uses a bit in the disposition code to 
indicate when the type of a file is to be changed between common and local. 

If the FET length is five words, the disposition code in the FET is not 
placed into FNT nor is it checked by SCOPE. 

The disposition code can be set in the FNT in several ways: 

When a REQUEST control card or REQUEST macro specifies a dis- 
position code, the code is put in the FNT. 

If the user issues any I/O request, including OPEN, for a file that 
does not exist and specifies a disposition code in his FET, this code 
is placed in the FNT. 

If the user opens or closes an existing file with an FNT disposition 
code of zero, the disposition code in his FET is placed in the FNT. 

Prior to disposing of a local file, the SCOPE system checks for. 
special name files such as OUTPUT, PUNCH, PUNCHB, etc. , 
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and if the current FNT disposition code is zero, an appropriate 
disposition code -will be inserted automatically in the file's FNT. 

If the user opens or closes a file with a non-zero FNT disposition code, the 
code is placed in his FET. In addition, for an I/O request other than an open 
or close on an existing file, the disposition code from the FNT is placed in 
his FET regardless of its value. Therefore, once a disposition code is set 
in the FNT it can never be changed; and after every I/O operation, the FET 
and FNT will contain the same disposition code. 

In setting a disposition code from his FET or from a REQUEST macro, the 
user should be certain the value is legal as the system will accept any value. 
Normally, the user should never set a disposition code greater than 47 8 ; nor 
should he set the EXPORT/IMPORT, RESPOND or common file change bits. 
These should be set only by the system. 



FET ADDRESS 



The relative address of the FET used for the last operation on the file. 



3.2 

FILE ENVIRONMENT 

TABLE 



The File Environment Table (FET) is a communication area initiated by the 
user; it is interrogated and updated by the system and the user during file 
processing. An FET must be declared for each file. The system section of 
the FET is used by the peripheral processor input/output routines and CPC 
as well as by the user program. A user section may be appended to the sys- 
tem FET to centralize other information pertinent to the file. All FET's 
reside within the field length of the program. The format of the system FET 
is shown below. 
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Bits 59 



47 44 



35 32 29 



23 



17 



logical file name (lfn) 


code and status 


device type 


r 


n 


u e 
Pp 


e 
b 


a 
i 




disposition 
code 


I 


FIRST 





IN 





OUT 


FNT pointer 


record block size 


physical record 
unit size 


LIMIT 




working storage fwa 




working storage 
lwa+1 


(Magnetic Tape) 
(Mass Storage) 


UBC | |MLRS 


record request/return information 


record 
number 




index length 


index address 




EOI address 




error address 


Label file name (first 10 chars) 


Label file name (last 7 characters) 


position number 


edition 
number 


retention cycle 


creation date 


Multi-file name (6 chars) 


reel number 



Words 
1 

2 

3 

4 

5 

6 

7 

8 

9 
10 
11 
12 
13 



To facilitate rapid changes of IN and OUT sizes, bits 18-59 of words 3 and 4 
are never used; all other fields not specified are reserved for future system 
use. 



3.2.1 

BASIC FILE 
ENVIRONMENT TABLE 



Logical File Name (lfn) (42 bits) 

The lfn field contains from one to seven alphanumeric display -coded char- 
acters starting with a letter, left justified; if less than seven are declared, 
unused characters are zero-filled. This field is used as a common reference 
point by the central processor program and the peripheral processor input/ 
output routines. 

The lfn parameter declared in an FET creation macro is also used as the 
location symbol associated with the first word of the FET. Thus, a 
reference to lfn in the file action requests is a reference to the base address 
of the FET. 
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Code and Status (CS) (18 bits) 

The CS field is used for communication of requested functions and resulting 
status between the central processor program and the peripheral processor 
input/output routines. This field is set to the request code by CPC when a 
request is encountered for this file. The request codes are defined in the 
file action request descriptions. The code and status bits have the following 
significance : 

Bits 14-17 Record level number. On skip and write record requests, 
this subfield is set by CPC as part of the function code. On 
read requests, it is set by CIO as part of the status when an 
end-of-record is read. Initially the level subfield is set to zero 
when the FET is generated. 

Bits 9-13 Status information upon request completion. Zero indicates 

normal completion. Non-zero indicates an abnormal condition, 
not necessarily an error; an OWNCODE routine, if present, 
will be executed. Status codes are described under OWNCODE 
routines. Initially, this subfield is set to zero when the FET is 
generated. 

Bits 0-8 Used primarily to pass function codes to a peripheral processor. 

Function codes are even numbers (bit has a zero value) . When 
the request has been processed, bit is set to one. When the 
FET is generated, bit must be set to one to indicate that the 
file is not busy. Bit 1 specifies the mode of the file (0 = coded, 
1 = binary). Bit 1 is not altered by CPC when a request is 
issued. 

Bits 2-8 are used to pass function codes to a peripheral proc- 
essor (file action requests). 

Bits 3 and 4 may be altered by the peripheral processor routine 
when the request is completed if an end-of-record (10 ) or 
end -of -file was read (11 ). 

The initial value of bits 2-17 should be zero. 
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SCOPE CIO Codes in Octal (Circular Buffer I/O) 



All codes indicated by - are illegal; all reserved codes are illegal. All codes are shown for coded 
mode operations; add 2 for binary mode. Example: 010 is coded READ, 012 is binary READ. Upon 
completion of operation, code/status in FET is changed to an odd number, usually by adding 1 to the 
code. In some cases, code is further modified to indicate manner in which operation concluded. 
Example: a READ function (010), at completion, becomes 011 (buffer full), 021 (end of logical record), 
or 031 (end of file). 



000 


RPHR 


004 


WPHR 


010 


READ 


014 


WRITE 


020 


READSKP 


024 


WRITER 


030 


- 


034 


WRITE F 


040 


BKSP 


044 


BKSPRU 


050 


REWIND 



054 


- 


130 


CLOSE.NR 


060 


UNLOAD 


134 


- 


064 


- 


140 


OPEN, READ 


070 


- 


144 


OPEN, WRITE 


074 


- 


150 


CLOSE 


100 


OPEN.READNR 


154 


- 


104 


OPEN.WRITENR 


160 


OPEN, ALTER 


110 


- 


164 


- 


114 


EVICT 


170 


CLOSE, UNLOAD 


120 


OPEN.ALTERNR 


174 


- 


124 


- 







200 Series for special reads or writes (reverse, skip, non-stop, rewrite, etc.) 

200 - 230 - 254 

204 - 234 REWRITEF 260 

210 - 240 SKIPF 264 

214 REWRITE 244 - 270 

220 - 250 READNS 274 

224 REWRITER 



READN 
WRITEN 



300 Series used for tape OPEN and CLOSE 



OPEN.REELNR 



300 
304 
310 
314 
320 



400 Series reserved for CDC 



500 Series to be reserved for installations 



324 


- 


330 


CLOSER, NR 


334 


- 


340 


OPEN, REEL 


350 


CLOSER 


354 


- 



360 
364 
370 
374 



CLOSER, UNLOAD 



600 Series 

600 
604 
610 
614 
620 
624 



630 
634 
640 
644 
650 



SKIPB 



654 
660 
664 
670 
674 



700 Series reserved for CDC 
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Device Type (DT) (12 bits) 

The device type field may be used in one of two ways : 

The file may be assigned to a specific type of allocatable device when an 
OPEN function is given. Such an assignment is effective only if no prior 
reference to the file has been made. 

The hardware type portion of the field will be set by SCOPE upon return 
from any other file action request, if the FET is more than five words 
long (the field length in word 2 of the FET is nonzero). 

The device type field contains two 6-bit fields; the left 6 bits specify a hard- 
ware device and the right 6 bits declare a type within the device. When the 
code is 00, SCOPE selects the most easily accessible allocatable device. 
Other codes are shown below in octal: 



Hardware Device 



Allocation or Recording Techniqu e 



AA 



01 



AB 



02 



t — 
AC 

AP 



03 
04 
05,06 

07 



6603-1 disktf 



6638 disk 



data cell 
6603-11 disktt 
CDC reserved 
3234/854 disk 
pack drive 



alternate 
sector halftrack 

sequential 
sector fulltrack 



00 system default, same as 03 

01 inner zone only 

02 outer zone only 

03 both zones 
to 4 both zones 
^05 inner zone only 
to6 outer zone only 

07 CDC reserved 

10 eight sector allocation (RESPOND) 

11-77 CDC reserved 

00 system default, same as 01 

01 alternate sector halftrack 

02 CDC reserved 

03 same as 01 
04-07 CDC reserved 

10 eight sector allocation (RESPOND) 

11-77 CDC reserved 

xx same as for 6603-1 

00 system default, same as 03 

01-02 CDC reserved 

03 alternate triplets of sectors, one track 

04-77 CDC reserved 



t Codes are defined but supporting software is not provided by SCOPE. 

tt6603-I disk is a basic 6603 with or without field option 10098 (disk speedup) 
installed; 6603-11 is a 6603 with both field options 10098 and 10124 (speedup 
augment) installed. 
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Hardware Device 



Allocation or Recording Technique 



tAF 


10 




814 disk file 










tAE 


11 




3637/863 drum 










AD 


12 




3637/865 drum 


01- 

04- 


00 

-02 

03 

-77 


system default, same as 03 

CDC reserved 

alternate triplets of sectors , 

one halftrack 

CDC reserved 


-- 


13- 


-17 


CDC reserved 










AX 


20 




ECS 




00 


normal 


system allocation 


— 


21- 


-27 


CDC reserved 










— 


30- 


-37 


reserved for 
















installations, mass 












storage only 










ttMT 


40 




60x 1/2-inch 7- 




(Right 6 bits 


in binary) 








track, magnetic 






xxxxOO 


HI density 556 bpi 








tape 






xxxxOl 
xxxxlO 
xxxxll 
xxOOxx 
xxOlxx 
xxlOxx 
xxllxx 
OOxxxx 
Olxxxx 
lOxxxx 


LO density 200 bpi 

HY density 800 bpi 

CDC "reserved 

Unlabeled 

SCOPE standard label (USASI) 

alternate label 

CDC reserved 

SCOPE standard data format 

X data format 

S data format 


tWT 


41 




1-inch magnetic 


ta 


pe 


llxxxx 


L data format 



TWT 


41 


— 


42-43 


TTR 


44 


tTP 


45 


— 


46-47 


LP 


50 


LI 


51 


L2 


52 




53-55 


— 


56-57 


CR 


60 


— 


61-65 


— 


66-67 


CP 


70 


DS 


71 


tGC 


72 


tHC 


73 


TFM 


74 


tpL 


75 




76-77 



CDC reserved 

paper tape reader 

paper tape punch 

reserved for installations 

501, 512, 505 line printer 

501, 505 line printer 

512 line printer 

CDC reserved 

reserved for installations 

405 card reader 

CDC reserved 

reserved for installations 

415 card punch 

6612 keyboard/display console 

252-2 graphic console 

253-2 hard copy recorder 

254-2 microfilm recorder 

plotter 

reserved for installations 



T Codes are defined but supporting software is not provided by SCOPE. 
' ' Codes 4000-7777 require a device assigned by REQUEST card or function 



before file is opened. 



60189400 Rev. I 



3-9 



Random Access (r) (1 bit) 

The r field is set to one if the RFILEB or RFILEC macro is used; otherwise, 
r is zero. This field indicates a random access file and that record position 
information should be returned. If the file does not reside on a random access 
device, the r field is set to zero when the first reference is made to it. 



Release Bit (n) (1 bit) 

A release bit set to one when a file action request is issued has the following 
effects for read and skip operations; it is meaningless on any other operation. 

After a read or a skip forward operation, record blocks will be released. 



User Processing (UP) (1 bit) 

The UP bit is set to one when the calling program is to be notified when an 
end-of-reel condition is encountered during a 1/2" magnetic tape operation. 
If the field is set to zero, tape switching proceeds automatically without 
notification to the calling program; the function in process when end-of-reel 
is detected will be completed on a subsequent reel of tape. 

When the UP field is set to one and an end-of-reel is detected on 1/2" mag- 
netic tape, the end-of-reel status is set, 02 g in bits 9-13 of the code and 
status field. This is the only point at which the end-of-reel status is re- 
turned. 

All functions that do not transfer data from the circular buffer will be com- 
pleted; those which transfer data may be re-issued as indicated by examination 
of the buffer pointers. CPC detects the end-of-reel status and transfers to 
the EOI OWNCODE routine, if present. At this juncture, the calling program 
may perform any action subject to the following restrictions: 

CLOSER and OPEN, REEL functions must eventually be issued for the 
file in that order. 

No file action requests other than CLOSER and OPEN, REEL may be 
issued for a labeled tape file. 

The following decision table indicates action taken by the system and per- 
mitted in the CP program. 
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End-of-Reel Detected 



Labeled Tape 


Y 


N 


Y 


N 


Up bit Set 


N 


N 


Y 


Y 




1 


2 


3 


4 



1. Automatic switching of tapes with SCOPE labels. CP program is not 
aware of the operation. Control returns to the CP program after the 
request obstructed by the end-of-reel condition has been completed on 
the new tape. 

2. Automatic switching of tapes without SCOPE labels; otherwise as in 1. 

3. OWNCODE routine entered, if present. Only CLOSER and OPEN, REEL 
requests may be issued, in that order. These requests should be issued 
with recall to simplify processing. When the OPEN, REEL request is 
issued for an input tape, the system will deliver the file header label for 
the new reel to the circular buffer. 

4. OWNCODE routine entered, if present. Any file action request is 
honored. Thus, the user may effectively put his own labels at the 
beginning or end of the tapes. Eventually a CLOSER function must be 
issued for the current reel of tape to terminate processing. Also, 
eventually an OPEN, REEL request must be issued for the subsequent 
reel of tape to restore the system to its proper status . If data is written 
prior to issuing the OPEN, REEL function for the new reel of tape the 
OPEN,REELNR option should be used so that this data is not overwritten. 

The OPEN function delivers an input label only if labels are declared on 
the REQUEST card or function. 

Routines which should be executed before and after the first volume file 
header label and the first volume trailer label may be written before and 
after the OPEN function or the file. Routines which should be executed 
before and after the last volume file trailer label may be written before 
and after the CLOSE function for an output tape. For an input tape such 
routines may be written in conjunction with the OWNCODE routine which 
processes the end of information status Olg in bits 9-13 of the code and 
status field. 

Error Processing (EP) (1 bit) 

The EP bit is set when the calling program is to be notified of error conditions. 
Generally if EP=0, the job is terminated. When labeled tape is checked, 
however the operator can terminate the job (DROP) or continue it (GO) . 
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Error Bypass (EB) (1 bit) 
Reserved for future use 

Absolute Index (AI) (1 bit) 

Reserved for system use. If AI=1, the request/return information field will 
contain the record block and PRU address of the logical record. This bit 
should be set only by EDITLIB. 



DISPOSITION CODE (dc) 12 bits 

The value in this field indicates the disposition to be made of a file when the 
job is terminated or the file is closed. This code has no effect if the file 
resides on a private disk pack or is a permanent file. 



Mnemonic 


Value (Octal) 
xxOO 


Disposition 
Scratch 


Default File Namef 


ttsc 


- 


CK 


xxOl 


Checkpoint 


- 


MF 


xx02 


Multi-file tape 


- 


ttsv 


xx04 


Save 


- 


PU 


xxlO 


Punch Hollerith 


PUNCH 


PB 


xxl2 


Punch Binary 


PUNCHB 


P8 


xxl4 


Punch 80 Columns 


- 


ttfFR 


xx20 


Film Print 


FILMPR 


tttFL 


xx22 


Film Plot 


FILMPL 


tttHR 


xx24 


Hard Copy Print 


HARDPR 


tttHL 


xx26 


Hard Copy Plot 


HARDPL 


tttPT 


xx30 


Plot 


PLOT 


PR 


xx40 


Print (501,505,512) 


OUTPUT 



tA file with the specified name will automatically be assigned the corre- 
sponding disposition code value at job completion. 

tt Mnemonic is defined but supporting software is not provided by SCOPE. 

^'f SCOPE recognizes mnemonic and its value, but does not provide drivers. 
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Mnemonic 


Value (Octal) 


Disposition 


PI 


xx41 


Print (501, 505 only) 


P2 


xx42 


Print (512 only) 


- 


xx 7x 


Reserved to Installation 


- 


xlxx 


Change common file 


- 


2 xxx 


RESPOND file 


_ 


4xxx 


EXPORT/IMPORT file 



Default File Namef 



All other codes are reserved to the system. 
Length of FET (8) (6 bits) 

The system FET length is determined as follows: FET first word address + 
5 + H = last word address + 1. The minimum FET length is five words 
(&= 0). If the minimum FET is used, only the logical file name, code and 
status field, FIRST, IN, OUT, and LIMIT are relevant. No other field will 
be set or checked by SCOPE. A length of six words (&= 1) is used if a 
working storage area is needed for blocking/deblocking. A length of eight 
words (£ = 3) is used if the r bit is set, indicating an indexed file. Length 
is nine words ((■ = 4), if OWNCODE routines are declared. The maximum 
system FET length is 13 words (It =8). The maximum size is used if a 
labeled tape file is declared. 

FNT Pointer (12 bits) 

The FNT pointer is set by SCOPE, upon return from a file action request, 
to the location of the file in the FNT/FST. The pointer is placed in the FET 
to minimize table search time and does not affect the program. The pointer 
will not be set if a minimum FET is used. (FNT is discussed in section 3. 1) 



Physical Record Unit Size (PRU) (15 bits) 

The physical record unit size of the device to which the file is assigned is 
returned in this field at OPEN time. It is given as the number of central 
memory words. The PRU size is used by CPC to determine when to issue 
a physical read or write. PRU size will not be returned if a minimum FET 
is used • 



t A file with the specified name will automatically be assigned the corre- 
sponding disposition code value at job completion. 
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Record Block Size (15 bits) 

If the file resides on an allocatable device, the size of the device record 
block is returned in this field at OPEN time. It is given as the number of . 
physical record units in a record block. If the number of PRU's is not de- 
fined or is variable, the field is set to zero. Record block size is not re- 
turned if a minimum FET is used. 



FIRST, IN, OUT, LIMI T 

Data is transmitted in physical record units, the size of which is determined 
by the hardware device. For example, the 6603 disk has an inherent PRU 
size of 64 CM words; binary mode magnetic tape files are assigned a PRU 
size of 512 words. 

For each file, the user must provide one buffer, which can be any length 
greater than a PRU size. This is called a circular buffer because it is 
filled and emptied as if it were a cylindrical surface in which the highest 
addressed location is immediately followed by the lowest. 

The FET fields FIRST, IN, OUT and LIMIT control movement of data to 
and from the circular buffer. 

FIRST and LIMIT never vary; they permanently indicate buffer limits to the 
user and to SCOPE. During reading, SCOPE varies IN as it fills the buffer, 
and the user varies OUT as he removes data from the buffer. During 
writing, the user varies IN as he fills the buffer with data, and the system 
varies OUT as it removes data from the buffer and writes it out — the 
program that puts data into the buffer varies IN, and the program that takes 
it out varies OUT. The user cannot vary IN or OUT automatically except 
when using READIN and WRITOUT functions; he must do this within the pro- 
gram by inserting a new value into lfn + 2 (IN) or lfn + 3 (OUT) . For the 
user's as well as for the system's convenience, the words containing IN 
and OUT contain no other items; this eliminates the need for masking 
operation. 

The system dynamically checks the values of IN and OUT during data trans- 
fers, making continuous read or write possible. 

If IN = OUT, the buffer is empty; this is the initial condition. If IN > OUT, 
the area from OUT to IN - 1 contains available data. If OUT > IN, the 
area from OUT to LIMIT - 1 contains the first part of the available data, 
and the area from FRIST to IN - 1 contains the balance. 
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To begin buffering, a READ function may be issued. SCOPE will put one 
or more PRU's of data into the buffer beginning at IN, resetting IN to one 
more than the address of the last word filled after each PRU is read. Data 
may be processed from the buffer beginning with the word at OUT, and 
going as far as desirable, but not beyond IN - 1. The user must then set 
OUT to one more than the address of the last word taken from the buffer. 
He sets OUT = IN to indicate that the buffer is empty. 

When a READ request is issued, if the buffer is dormant (no physical read 
occurring), CPC determines how much free space the buffer contains. 
If OUT > IN, OUT - IN words are free. If IN > OUT, (LIMIT - IN) + 
(OUT - FRIST) words are free. The system subtracts 1 from the number of 
free words, because it must never fill the last word; this would result in 
IN = OUT, which would falsely indicate an empty buffer. If the number of 
free words, minus 1, is less than the PRU size, CPC does not issue a 
physical read request; control is returned normally. 

The example below illustrates the way IN and OUT pointers are used. 

Speed of operation is not considered and simultaneous processing and physical 

I/O is not attempted. 

The initial buffer pointer position is: 

FIRST = BCBUF 
IN = BCBUF 

OUT = BCBUF 
LIMIT = BCBUF+500 

The user issues a READ with recall request. 

Neglecting the possibilities of an end-of-record or end-of-file, the 
system reads as many PRU's as possible (if PRU size is 64 words, 
7 x 64 = 448 words) and leaves the pointers: 

FIRST = BCBUF 
IN = BCBUF+448 

OUT = BCBUF 
LIMIT = BCBUF4 500 
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The user is processing items of 110 words. He takes four items from 
the buffer, leaving the pointers: 

FIRST = BCBUF 

IN = BCBUF+448 

OUT = BCBUF+440 
LIMIT = BCBUF+500 

The user issues another READ request, since he knows the buffer does 
not contain a complete item. The system is aware that IN > OUT, so 
that the vacant space amounts to LIMIT - IN + OUT - FIRST = 492 words; 
since it must not fill the last word, it must read fewer than 492 words. 

The nearest lower multiple of 64 is 7 x 64 = 448, so it reads 52 words 
into IN through LIMIT - 1, and then 396 more words into FIRST through 
FIRST + 395. It then resets IN so that the pointers look like: 

FIRST = BCBUF 
IN = BCBUF+396 

OUT = BCBUF+440 
LIMIT = BCBUF+500 

The system has just used the circular feature of the buffer; now the user 
must do so. The next time he wants an item, he takes the first 60 words 
from OUT through LIMIT - 1, and the remaining 50 from FIRST through 
FIRST + 49. Then he resets OUT, making the pointers: 

FIRST = BCBUF 
IN = BCBUF+396 

OUT = BCBUF+50 
LIMIT = BCBUF+500 

On input, this can continue indefinitely, with OUT following IN, around the 
buffer. The system stops on encountering an end-of-record or end-of-file, 
and sets the code and status bits accordingly. The system may, or may not, 
have read data before the end-of-record , so it is up to the user to examine 
the pointers and/or process the data before taking end-of-record or end-of- 
file action. 
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In writing, the process is similar, but the roles are reversed. The user 
puts information into the buffer and resets IN; and when he calls the system, 
it removes information from the buffer and resets OUT. For writing, the 
system removes data in physical record units and empties the buffer if 
possible. The user must be careful not to overfill the buffer; IN must not 
become equal to OUT. During the process of emptying the buffer, SCOPE 
resets OUT after each PRU has been written and checked for errors. 

Working Storage Area 

The two fields in word 6 of the FET specify the first word address (fwa) and 
last word address + 1 (lwa + 1) of a working storage area within the program 
field length. Logical records may be deblocked into or blocked from this 
area into the circular buffer. (See READIN and WRITOUT. ) 

File Indexing Fields 

Words 7 and 8 are used for communication between the peripheral processor 
input/output routines and the running program depending on the device and 
file type. 

For magnetic tapes with S or L data format, the structure of word 7 of the 
FET is: 



word 7 



59 


29 


23 


17 









UBC 




MLRS 



UBC (Unused Bit Count) Bits 24-29 

The UBC field is used for a file declared to have either S or L format. 
For a READ or READSKP function, SCOPE will store into this field the 
number of low-order unused bits in the last data word of the record. 
The UBC field is not used during a READN request. For a WRITE , 
WRITER or WRITEF function, SCOPE will read the contents of UBC and 
adjust the length of the record accordingly. 

For example, to write a single record of 164 decimal characters, the 
data length is 17; to the nearest CM word. The number of low-order 
unused bits in the last word would be 36 . The user would set UBC ' = 36 , 
set IN and OUT pointers to reflect 17 words of data, and then issue a 
WRITE or a WRITER. 

SCOPE does not use the UBC field during a WRITEN request. UBC may 
range from to 59, but will always be a multiple of 12 when set as a 
result of a read operation. If it is not a multiple of 12 for a write 
request, SCOPE will truncate the value to the nearest multiple of 12: if 
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UBC is 18, SCOPE will execute as though it were 12, and if UBC is 6, 
SCOPE will execute as though it were 0. The field in the FET remains 
unchanged. 

MLRS (Maximum Logical Record Size) Bits 0-17 

The MLRS field contains the size of the largest logical record to be 
encountered (considered as valid when either reading or writing) when 
the S or L tape format is used. The size is given in number of CM 
words. 

The MLRS field is required for all S and L tape operations; therefore, a 
7-word Fet is mandatory. 

For S tape format, if MLRS = 0, the value of the maximum PRU is 
assumed to be 512 words. For L tape format, if MLRS = 0, the 
assumed maximum PRU is LIMIT - FIRST - 1 for standard reads and 
LIMIT - FIRST - 2 for READN. 

For mass storage random files, the format of word 7 of the FET is: 



59 29 





record request/ 
return information 



The file indexing fields (record request/return information, record number 
index length and index address) are used for communication between the 
peripheral processor input/output routines and the CP programs. Index 
address and index length fields are declared when the FET is generated; the 
index buffer must be within the program field length. The record request/ 
return information field is set to zero when the FET is generated. Both the 
indexing functions and the peripheral processor input/output routines set the 
field during random file processing. 

For other than the SCOPE indexing method, the following information is 
pertinent. At the start of writing a new logical record, if the random access 
bit and the record request/return information field are non-zero, the latter 
field is assumed to contain the address of a location within an index. The PP 
routine inserts into that location (in bits 0-23) the PRU ordinal (starting from 
1) of the logical record. To read the record again, the random access bit 
should be set to non-zero and the PRU ordinal should be entered in the FET 
in the record request/return information field. 
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OWNCODE Routines 

Addresses of user-supplied routines may be given in the FET. These 
routines are executed by CPC as indicated below. A zero value indicates 
that no routine is supplied. 

An OWNCODE routine should be set up like a closed subroutine with execution, 
beginning in the second word of the routine. CPC calls an OWNCODE routine 
by copying the exit word of CPC into the first word of the OWNCODE routine, 
putting the contents of the first word of the FET into XI, and branching to 
the second word of the OWNCODE routine. 

Termination of an OWNCODE routine by a branch to its first word causes a 
branch to the point in the program to which CPC would have returned if the 
OWNCODE routine had not been called. The A, B, and X registers may 
have been changed by CPC before control gets back to the routine that called 
CPC. Therefore, an OWNCODE routine which is terminated by a branch 
to its first word should not rely on passing information to the main program 
in the registers. 



EOI Address Field 

CPC enters the end-of-information (EOI) routine under the following 
circumstances: 

Bits 9-13 of Code and Status: 

01 R End-of-information encountered after forward operation or 
beginning-of-information after backward operation 

02 End-of-reel reached during magnetic tape forward operation 

8 

Just before entering an end-of-information OWNCODE routine, CPC zeros 
bits 9 and 10 of the first word of the FET. However, as the routine is 
entered, XI still contains the first word of the FET as it appeared before 
those two bits were zeroed. 



Error Address Field 

This field specifies an address to receive control if an error condition occurs 
after a file action request. The FET code and status field will reflect the 
error condition. If processing can continue, the error routine should exit 
through its entry point; otherwise, an ABORT request may be issued. 

If the error address field is zero, the run continues normally. The FET 
code and status bits reflect the error condition upon normal return to the 
program. 
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Bits 9-13 of Code and Status (values are octal): 

04 Irrecoverable parity error on last operation, or lost data on 
write . 

10 When reading from magnetic tape, physical record size 
exceeds circular buffer or maximum allowable PRU size 
(MLRS for S and L tapes) . When writing to S or L magnetic 
tapes, the FET is less than 7 words, or an attempt is made 
to write a noise record. When writing to mass storage, all 
mass storage space meeting the constraints imposed by the 
file (allocation style and/or equipment number) is in use or 
otherwise unavailable. 

20 OPEN function redundant. 

21 CLOSE function redundant. 

22 Illegal function. 

23 Index full. 

24 FNT full. 

25 An attempt was made to read or write record number n of a 
random file, but the index of the file is full. 

26 An attempt was made to read a named record from a random 
file, but the name does not appear in the index. 

27 An attempt was made to write a named record on a random file , 
file , but the name does not appear in the index , and there is 

no room to add a new name. 

30 Buffer argument error. 

31 A READ or SKIPF was attempted beyond EOI. 

32 File name does not meet the requirements of section 3.2.1. 

If both EOI and error routine execution are needed, the error routine is 
executed. Just before entering an error OWNCODE routine, CPC zeros bits 
11-13 of the first word of the FET. However, as the routine is entered, XI 
contains the first word of the FET as it appeared before those bits were 
zeroed. 



3.3 

LABELED 

TAPE FILES The label macro with the following format specifies information stored in 

the file header label (appendix C) . 

lfn LABEL fin, ed, ret, create, reel, mfn, pos 



3_ 20 60189400 Rev. I 



File label name (fin). 17 alphanumeric display code characters starts with 
letter, left justified; if less than 17, it is binary zero-filled. The file label 
name ensures the correct file is referenced. The file is checked when 
opened if labeled tape REQUEST card or function is specified. 

Edition Number (ed). 2 characters stored in field 8 of file header label for 
output tape and verified for input tape. If omitted, 01 is written in output 
tape label and FET, and no checking is done for an input tape. 

Retention Cycle (ret). 3 digits specify number of days a tape is to be 
protected from accidental destruction. This field 12 is added to value of 
creation date to obtain expiration date written on output tape label or verified 
for input. When ret is 999, an expiration date of 99999 establishing perman- 
ent retention is placed in the tape label. 

Creation Date. First two characters specify year, remaining three Julian 
day within year. Stored in field 10 of file header label for output tape and 
verified for input tape. If omitted, today's date as stored in SCOPE system, 
is written in this format in label output tape and in FET. For input tape, 
this field is read from label and stored in FET. 

Reel Number. 4 characters stored in field 5 of the file header label for 
output tape and verified for input tape. If omitted, 0001 is written in output 
label and FET. For each reel, this field is increased by one at conclusion of 
processing for file trailer label and tape mark is written on the tape. When 
file is closed, this field is set to 0001. 



3.3.T 

MULTI-FILE TAPES Multi-file Name (mfn); left justified alphanumeric display -coded characters 

starting with a letter; if less than 6 characters, binary zero-filled. Field 4 
of the file header label identifies all files of a multi-file volume and must be 
the same for all files on a volume. If this field is omitted, only a single file 
may be generated or read in a volume set. Tapes with Y labels do not have 
the multi-file capability. 

A multi-file tape must be declared by stating its disposition on a REQUEST 
card/function; the multi-file name is given as the lfn, for example: 

REQUEST, mfn,dt,MF,x. 

Only one file on a multi-file tape may be open at any given time. 

Position Number (pos), 3 digits; ignored unless a multi-file name is speci- 
fied. If it is absent for a multi-file output tape, the file is assigned in 
sequence in which it is written and this position number is returned to FET. 
Overwriting a file on a multi-file volume set destroys the remaining files. 
If absent for a multi-file input tape, the value determined in the search for 
the file is stored in FET. 
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3.4 

FET CREATION 

MACROS System macros in the COMPASS language facilitate generation of the system 

FET, as follows: 

The subfields (WSA, DTY, DSC, UPR, IND, OWN, LBL, EPR, UBC, MLR) 
are order-independent; within the subfield, order is fixed. Upper case char- 
acters designate subfield content, lower case characters indicate parameters 
to be supplied by the user. All parameters except lfn, fwa, and f are optional. 

Coded File - Sequentia l 

lfn FILECfwa, f, (WSA = addr , l w ), (OWN = eoi, err), LBL, DTY= dt, 
DSC =dc, UPR, EPR, UBC= ubc, MLR = mlrs 

Binary File - Sequential 

lfn FILEBfwa, f, (WSA = addr , l w ), (OWN = eoi, err), LBL, DTY = dt, 
DSC = dc, lIpR, EPR, UBC = ubc, MLR = mlrs 

Coded File - Random 

lfn RFILECfwa, f, (WSA = addr , 1 ), (IND = addrj, lj), 

(OWN = eoi, err), LBL, DTY = dt, DSC = dc, UPR, EPR 

Binary File - Random 

lfn RFILEB fwa, f, (WSA = addr , 1 ), (IND = addr^ 1.), 

(OWN = eoi, err), LBL, DTY = dt, DSC = dc, UPR, EPR 

lfn file name 

fwa substituted in FIRST, IN, and OUT 

f length of circular buffer + 1 (fwa + f is substituted in 

LIMIT) 

WSA Working storage area parameters 

addr w first word address of working storage area 

l w addr w + l w = (last word address + 1) of working storage 

area 

IND Index buffer parameters 

addr^ first word address of index buffer 

li length of index buffer 
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OWN OWNCODE routines 

eoi end-of-information address 

error error address 
DTY Device type parameter 

dt 12-bit code described in FET field descriptions 

DSC Disposition code parameter 

dc 12-bit code described in FET field descriptions 

UPR User specifies processing at end-of-reel 

LBL Label information will follow. The LABEL macro which provides 
label information, must be written immediately following the 
FILE macro to which it pertains. 

EPR User specifies handling of error conditions. 

UBC Unused bit count 

ubc 6-bit code described in FET field descriptions 

(S and L tapes only). It causes the generation of a 7-word 

FET which is mandatory for S and L tapes. 

MLR Maximum logical record size 

mlrs 18-bit code described in FET field descriptions 
(S and L tapes only). It causes the generation of a 7-word 
FET which is mandatory for S and L tapes. 



Examples: 



To create a minimum FET for the standard INPUT file: 

LBUFFER EQU 65 

INPUT FILEC BUFFER, LBUFFER 

To create an FET for a binary random file: 

LBUFFER EQU 65 
LINDEX EQU 25 
FILEABC RFILEB BUFFER, LBUFFER, (IND = INDEX, LINDEX) 
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To create an FET for a labeled tape file with user processing at end-of- 
reel condition. OWNCODE routine is supplied: 

TAPE1 FILEB BUFA, LBUFA, LBL, UPR, (OWN=PROCEOR) 

TAPE1 LABEL SORTINPUTTAPE, 32, 90 

To create an FET for a list file. OWNCODE routines are supplied 
and the working storage area is used: 

PRINT FILEC BUFB,LBUFB,(WSA=LINE,14),DSC=40B, 

(OWN= ENDING, ERRORS) 

To create an FET for a file to be written on a 6603 Disk, using only 
inner zones: 

FILE1 FILEB BUFD, LBUFD,DTY=0101B 



3.5 

CENTRAL 

PROGRAM CONTROL 

SUBROUTINE (CPC) 



The central program control subroutine (CPC) provides the linkage between 
user programs and the SCOPE system. All file action requests and system 
action requests are processed by the CPC library subroutine which is loaded 
with the user program within the field length of the job. The program 
communicates with CPC through macro requests and the file environment 
table (FET). Communication with SCOPE is handled by CPC setting and 
checking RA + 1. 

CPC may also cause the execution of one or more user subroutines for 
which addresses are specified in the FET. Such a subroutine is entered at 
the address given in the FET + 1. The exit from the CPC is stored at the 
OWNCODE routine given in the FET; (XI) = the first word of the FET. 

A normal exit from CPC returns control to the object program at the point 
following the macro request. A normal exit is made if the request is honored 
and no error conditions occur. XI contains word 1 of the FET upon exit if 
the status is other than request completed. CPC saves and restores all 
registers except Al, A6, XI and X6. 



3.5.1 

CALLING SEQUENCE Format of the calling sequence to the central program control subroutine: 



59 






41 




39 




29 




17 







X 


RJ 


CPC 


yyy 


n 


r 




z 
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RJ Return jump instruction 

CPC Entry point to the CPC subroutine 

n = File action request 

yyy Display-coded name of the PP program to be inserted 
by CPC in RA + 1 or one of the following: 

000001 if only a file RECALL is wanted 
000007 for CLOSE or EVICT 

000004 for OPEN 

000002 for READ or WRITE (without end-of-record) 

000003 for other functions 

x SA1 <base address of FET> 

z Request code 

n = 1 System action request 

yyy Display-coded name of the called PP program 

x not relevant 

z parameters as required 

r = 1 Issue request and enter RECALL 
r = Issue request and return control to the program 

A file action request to the SCOPE monitor is formatted by CPC in RA + 1 
as follows: 



59 



41 39 



17 



yyy 





r 




base address of FET 



A system action request to the SCOPE monitor is formatted in RA + 1 as 
follows: 



59 



41 39 35 



yyy 



lr 



z appears in the buffer code and status field of the FET. 
Bits not specified in the calling sequence are reserved for future system use. 
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3.6 

SYSTEM 

COMMUNICATION 

MACROS 



In the following descriptions the system macro is followed by the macro 
expansions . 



3.6.1 

FILE ACTION 
REQUESTS 



File action requests result in a return jump to the central program control 
subroutine. Subsequent actions depend on the state of the file. An OWNCODE 
routine may be executed and/or a request to SCOPE may be posted. File 
action requests will be posted but not honored if the EOI or error bits are 
set and OWNCODE addresses are present where a call is issued to CPC. 
In either case, control returns to the calling program after SCOPE accepts 
the request if the recall bit, r, is equal to zero, or after SCOPE completes 
the request if r is equal to one. If the optional recall parameter is non-blank, 
r is set to one . 



REQUEST 



REQUEST param 
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RJ 


CPC 


REQ 


1 


1 




param 



With the REQUEST function, a CP program can assign equipment during 
execution without requiring a REQUEST control card, param is the first 
word address of a two-word list of parameters, as shown below. 



59 


47 




35 


28 




23 


17 


11 


logical file name 


status 




eq 




a 


pyqx 


dc 


dt 



The values for dc and dt are given in section 3.2.1 (Basic File Environment 
Table). The 4-bit parameter pyqx applies only when dt specifies l/2-inch 
magnetic tape, p and q are interpreted only if dt = 4000, 4001, or 4002, 
otherwise the corresponding entries in dt override these two parameters. 
y is always interpreted, x is currently not interpreted. The meaning of 
pyqx is: 
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p = l 


External tape 


p = 


SCOPE tape 


y = i 


2 tapes 


y = o 


1 tape 


q=l 


SCOPE system labels for this file 


q = 


Unlabeled 


X = 1 


Existing file 


x = 


New file 



The 1-bit parameter, a, has the same effect for mass storage assignment as 
the * preceding the dt on the REQUEST card (section 2.4). If a = 0, operator 
action is requested. If a = 1, assignment is automatic. The eq field speci- 
fies the EST ordinal of the device to which the file is to be assigned. If dt is 
also specified, the type must match that of the EST entry. If eq is specified, 
no operator action is required regardless of the value of a. 

If Hie lfn designated by REQUEST parameters is already associated with a 
file, the REQUEST function is ignored and control is returned to the calling 
program. Therefore, the REQUEST function should be issued prior to any 
reference to the logical file name, since a later reference to a nonexistent 
lfn will cause the name to be associated with an empty file on a mass storage 
device. The status field should contain zero when the REQUEST function is 
issued. Bit is set to one when the function is completed. In addition, the 
following octal values may be returned in bits 9-13 of the status field. 

22 Illegal function; REQUEST function was issued without the 
recall bit. 

23 Device type of specified EST did not match dt or automatic 
assignment indicated for a non-allocatable device. 

24 FNT is full. 

26 No equipment is available; requested equipment does not exist 

in the configuration or all equipment of this type is already 
assigned to this control point. 

30 Duplicate file name, file already assigned. 



OPEN 



OPEN lfn, x, recall 
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RJ 


CPC 


000004 





r 




z 
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The OPEN function readies the file for processing. The x parameter specifies 
the operation to be performed: READ, WRITE, READNR, WRITENR, ALTER, 
ALTERNR, REEL or REELNR. The OPEN function causes information to be 
returned to the user via the FET. 

OPEN will not reset the buffer pointers; the user is responsible for correctly 
setting the pointers. 

This function is optional except in the following cases: 

Indexed file: The OPEN function is required to read the index into 
the index buffer. 

File recorded on l/2-inch magnetic tape with standard SCOPE system 
labels: The OPEN function is required to process the label and position 
the tape. The label is delivered to the circular buffer for an input file. 

Device type other than 0000 is to be assigned to the file. 

x = READ (Z = 140) 

If the file has a system label, it is read into the circular buffer and positioned 
at the first data record. If the file does not exist, an end-of-information 
status is returned. The file may be read only until it is closed. 

x = WRITE (Z = 144) 

If the file has a system label, it is written using the parameters in the FET. 
The file remains positioned after the tape mark following the tape label. The 
file may be read and written until it is closed. 

x = ALTER (Z = 160) 

If the file has a system label, it is read into the circular buffer and the file is 
positioned at the first data record. If the file does not exist, an end-of- 
information status is returned. The file may be read and written until it is 
closed. 

A file is normally rewound when the OPEN function is issued. If it is not to 
be rewound, options of x may be issued: 

x = READNR (Z = 100) Open as in READ; do not rewind. 

x = ALTERNR (Z = 120) Open as in ALTER; do not rewind. Security 

code is SET OPEN. 

x = WRITENR (Z =-- 104) Open as in WRITE; do not rewind. 
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Swapping for multi-reel, labeled tapes may be controlled by setting the UP 
bit in the FET and using the following option: 



CLOSE 



x = REEL (Z = 340) 

x = REELNE (Z = 300) 
CLOSE lfn,x, recall 



Tape is rewound; for labeled tape beginning 
label is processed. Reel is initialized. 

Tape is not rewound. Reel is initialized. 



59 


47 41 39 


29 


17 


SA1 


lfn 


RJ 


CPC 


000007 


i 


z 



The CLOSE function sets the file to closed status. The x parameter specifies 
additional action to be performed. An end-of -information mark is written on 
an output file. If the file resides on l/2-inch magnetic tape and standard 
SCOPE system labels are used, ending label procedures are performed. 



x is absent (Z = 150) 

x = NR (Z = 130) 

x = UNLOAD (Z = 170) 



File is set to beginning of information or 
beginning of current reel. Buffer pointers 
(IN and OUT) are set equal to FIRST. 

File is not rewound. 

Termination procedures for the file are 
executed. Files are flagged for no rerun 
(as indicated below) if the initial conditions 
for a job have changed. Files which have 
special names are given the corresponding 
disposition (section 3.2.1). A magnetic 
tape file is rewound and unloaded. The lock 
bit is set for a file on a private pack and 
the normal end-of-job processing will 
release the space and delete the reference 
to the file name. 
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File Type 

Local 
(section 1.3.1) 

Local 



Local 

Old Common' 

Common 
(section 1.3.1) 

Common 



New Common'' 



Disposition Device Type 

Allocatable 

immaterial Non-allocatable 



7*0 



immaterial 



immaterial 



Allocatable 



Allocatable 



Non-allocatable 



Action 

Release space on 
device, delete refer- 
ence to file name 

Release device, de- 
lete reference to file 
name 

Assign to system for 
disposition 

Same as for local , 
except prohibit rerun 

Prohibit rerun, 
assign to system as 
a common file 

Prohibit rerun , off 
equipment, assign to 
system as a common 
file 

Same as for common 



For a local file on a private disk pack, device label, RBR record, and RBT 
chain are written on the pack. The unit assignment is dropped from control 
point. The disk pack remains in a private mode until unloaded by operator 
and a new pack is added. 



An old common file is one that was common at the beginning of a job and 
has since been released by a RELEASE card or a COMMON request. It is 
treated as a local file except for the RERUN feature. 

tf A new common file is one that was created during the job and has not been 
detached from the control point. 
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CLOSER 



CLOSER lfn, x, recall 
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47 


4139 




17 







SA1 


lfn 


RJ 


CPC 


000007 


Or 


z 



The CLOSER function is used for files on l/2-inch magnetic tape to terminate 
processing prematurely on a given reel of a multi-reel tape or to control 
labeling. If standard SCOPE system labels have been used, ending label pro- 
cedures are performed for the reel. 

The x parameter specifies file position after CLOSER action. 



x is absent (Z =350) 

x = NR (Z = 330) 

x = UNLOAD (Z = 370) 



Current reel is rewound. 

Reel is not rewound. 

Tape is rewound and unloaded. 



EVICT EVICT lfn, recall 

59 47 41 39 



29 



17 



SA1 


lfn 


RJ 


CPC 
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r 




000114 



CONTRLC 



EVICT releases to the system all space occupied by a file on mass storage 
and makes it available for use by either the releasing program or other pro- 
grams. The logical file name is retained. EVICT is ignored for permanent 
files, and an Information message is issued. 



CONTRLC addr 
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addr 



With the CONTRLC function, a CP program can read or backspace the control 
card record, addr is the address of a word in the following format: 



59 


17 


Reserved for system use 


code 
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code Is both the function and status reply as follows: 

READ code = OOOOlOg 

The next control card is placed in RA+70 to RA+77 with the 
space remaining between the end of the card and RA+100 
zeroed. 

BKSP code = 000040s 

The control statement pointer is reset to the previous 
statement. 

When the function is completed bit zero of the code is set to one. If on the 
read there are no more control cards, the area RA+70 to RA+77 is zeroed 
and bit 4 is set to 1 for end of record. If the record is set to Hhe start of the 
control card record when a BKSP function is issued, the statement pointer is 
unchanged and the end of record reply is issued. 

With this request the user can position the control card record for SCOPE job 
processing, and it is his responsibility to position the record properly, for 
example in front of an EXIT card; otherwise results are unpredictable. 



3 6 2 

DATA FUNCTIONS 



READ 



READ lfn, recall 
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This function reads information into the circular buffer if the specified file 
is open. IE there is room in the circular buffer for at least one physical 
record unit, reading is initiated and continues until: 
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Buffer does not contain enough room for the next physical record 

End-of-record or end-of-file is encountered (not applicable for S or L 
tapes) 

End-of -information is encountered 

An error is encountered (see FET, section 3.2) 

For S or L tapes, one physical record is read 

Mode is determined by bit 1 in first word of FET. If end-of-record (bit 4) is 
set upon entry to CPC, no operation is performed. For S or L tapes, the 
unused bit count is returned to the UBC field in FET word 7. 



READN READN lfn, recall 
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47 
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L7 




00 


SA1 


lfn 


RJ 


CPC 


000003 


Oi 




000260 



S or L magnetic tape only: The READN function reads data from tape to the 
circular buffer until one of the following conditions occurs: 

Buffer does not contain enough room for next record (MLRS+1 words) , 
end-of-file is encountered, end-of -information is encountered, error 
is encountered. 

The mode of the file is determined by bit 1 in the first word of the FET. 
Word 7 of the FET must contain the size of the largest possible logical 
record when this function is used (appendix L) . 

READN enables non-stop reading for maximum tape throughput. READN can 
be used only for S or L tapes. As long as the user provides sufficient room 
in his buffer (room for two records and their header words), tape reading 
continues without releasing and reloading the PP between logical records, 
and maximum utilization of interrecord gap time is realized. The concept of 
circular buffering is retained; however, a header word is placed in the buffer 
along with data from each logical record. It precedes the data and contains 
the number of CM words in the logical record and the number of unused bits 
in the last data word. IN is moved by the I/O system after a complete logical 
record together with its header word have been placed in the buffer. The 
format of the header word is: 
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No. Bit! 
unused 



#CM 
words 
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READSKP 



READSKP lfn ,4, recall 
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READSKP functions like READ, except that if the buffer is filled prior to the 
end-of-record, the rest of the information is discarded and the file will be 
positioned ready to read the next logical record. If the MLRS field in the 
FET is zero, the buffer size is set to 512 words for S tapes and to the 
LIMIT - FIRST - 1 for L tapes. 

If a level parameter (ft) is specified , information is skipped until the occur- 
rence of an end-of-record with a level number greater than or equal to the 
one specified. Only a level 17 (EOF) is recognized by S and L tapes. Any 
other level parameters in the request will be ignored. 

Executing a READSKP sets the end-of-record (bit 4) to 1 , since an end-of- 
record is encountered. If the next operation on the file is READ, the EOR 
bit must first be zeroed by the calling program. 



RPHR 



RPHR lfn, recall 
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Magnetic Tape (SCOPE or X format only) 

The RPHR function causes any information already in the buffer to be dis- 
carded by setting the OUT pointer equal to the IN pointer; then the next 
physical record is read into the buffer. The mode is determined by bit 1 of 
the first word of the FET. For coded files, only conversion from external 
to internal BCD is performed. If the data read does not exactly fill an 
integral number of CM words, the last word is filled with zeros. 
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READNS READNS lfn, recall 
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Mass storage files only 

READNS operates in the same way as READ, except that it is not ignored by 
CPC if the last code/status in the FET is 02X or 03X, and reading does not 
necessarily stop at the end of a logical record. Instead, a READNS operation 
terminates under any of the following conditions: 

1. Next PRU will not fit into the circular buffer. 

2. A zero length logical record (any level) has been read. 

3. A level 16 or 17 logical record (any length) has been read. 

4. End-of-information has been encountered. 

5. An irrecoverable error is detected; the error code ee is usually 04 for 
parity error. 

The status stored in the FET for each case is as follows: 

case 1 000011 coded, 000013 binary 

case 2 or 3 740031 coded, 740033 binary 

case 4 741031 coded, 741033 binary 

case 5 OeeOll coded, 0ee013 binary 

In cases 2 and 3 the level of the terminating logical record is lost. 



READIN 



READIN lfn.x 

READIN may be used for indexed or sequential mass storage files or tape 
files. The format depends on file mode, file index, working storage area, 
and the x parameter as shown in the following pages. In the descriptions n 
represents the number of words in the working storage area. 
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READIN takes the next n words from the circular buffer of file lfn and stores 
them in the working storage area; a READ request is issued if the buffer is 
empty. If the file is binary mode, READIN attempts to fill the working 
storage area until end-of -record or end -of -information is encountered. 
For a coded file, information is moved to the working storage area until a 
zero byte (end-of -line) is encountered or until the working storage area is 
full. When a zero byte is encountered, two blanks are substituted and the 
remainder of the working storage area is filled with blanks . If a zero byte is 
not encountered before the working storage area is full, the remainder of the 
line is skipped and a subsequent READIN request reads the next line. 

The status of the request is returned in XI as follows: 

+0 Requested number of words was read and the function 

completed normally. 

positive Fewer than n words remained in the logical record when the 
nonzero request was issued. When control is returned to the user 

program, XI contains the last address + 1 of the data trans- 
ferred to working storage or first word address if no data 
was transferred. For coded files, this is always the first 
word address. 

negative If end-of -information or end-of-file is encountered, XI 
nonzero contains a negative number. No information is transferred 
into the working storage area . 

If a working storage area is not specified, a READIN request has no effect 
and no error indication is given unless it addresses a file with a name or 
number index. In that case, the effect of the request will be to terminate 
any previous action on the file, locate the specified logical record; the next 
EEADIN request to transfer data from that file will begin with the first word 
of the specified record. 

1. x is absent: EEADIN lfn 
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lfn 



This form of the READIN request transfers data to the working storage area. 
It may be used for tape or mass storage files since it transfers data from 
buffer to working storage area; if the buffer is empty a READ is issued. If 
lfn is a mass storage file, it may be sequential or random. 
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2. x is of the form /name/: READIN lfn,/name/ 
59 29 17 



RJ 



name 



IORR 



lfn 



With this form of the READIN request, logical record /name/ on the mass 
storage file named lfn is read into the circular buffer, n words are trans- 
ferred to the working storage as described above. The file must have a 
name index. 

3. x is of the form m where m is a logical record number: READIN 
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lfn 




m 



WRITE 



This form of the READIN request causes the logical record number m of the 
file, lfn, to be read into the circular buffer, n words are transferred to the 
working storage area as described above. The file must be indexed by name 
or number. If m is zero, the next record is read. The next record is the 
first logical record of the file if this is the first request, or the last logical 
record read + 1, for any subsequent READIN. 

WRITE lfn, recall 
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The WRITE function causes information to be written from the circular buffer. 
For mass storage files and SCOPE standard and X tapes, only full PRU's are 
written. Writing continues until the buffer is empty or there is not enough 
data in the buffer to fill a PRU. For S and L tapes only one record is written. 
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For S or L tapes, if the requested record length, indicated by the OUT and 
IN pointers, is greater than MLRS, device-capacity-exceeded status is 
returned (10) and the record is not written. 
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This function is processed the same as WRITE, with the following exceptions: 

For mass storage files, SCOPE standard tapes, and binary X tapes, data 
in the circular buffer is written out and terminated by a short or zero- 
length PRU to indicate end- of- record. If no information is in the buffer, 
a zero-length PRU is written. 

For coded X tapes, data is written in 136 character PRU's until the 
buffer is empty. No short PRU is written. 



If the level parameter (H) is present, the short or zero-length PRU will 
reflect the level number. In the absence of the level parameter, the I field is 
set to and level zero is assumed. The Si field is ignored for S, L and X 
tapes . For S and L tapes the WRITER request is identical to the WRITE 
request, unless made through CPC for records less than 512 g words. 



WRITEF 



WRITEF lfn, recall 
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For SCOPE standard tapes Hie WRITEF function produces a logical end-of- 
file mark; it is written as a zero-length physical record of level 17g. When 
this function is issued, any data present in the buffer is written and termi- 
nated with a level zero end-of-record. If the buffer is empty and the last 
operation was WRITE, a zero length PRU is written. 

For an S or L tape, if data in the buffer is less than or equal to MLRS, it is 
written to tape followed by a physical tape mark. If data in the buffer exceeds 
MLRS, nothing is written and device capacity exceeded is returned to the FET. 



3-38 



60189400 Rev. I 



For X tapes, data is written as in WRITER, and terminated with a physical 
tape mark. 



WRITEN 



WRITEN lfn, recall 
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Magnetic tape only; S and L tapes only: 

WRITEN improves throughput by writing one or more logical records on 
tape. As long as the user provides data ahead of the I/O system, tape 
writing continues without releasing and reloading the PP between logical 
records, making full use of the interrecord gap on tapes (as long as the 
circular buffer contains at least two records) . The concept of circular 
buffering is retained. However, a header word must precede each logical 
record in the buffer. This header word gives the number of CM words in 
the logical record and the number of unused bits in the last data word. If 
the number of unused bits is not mod 12, the I/O system will make it so for 
execution by subtraction. The UBC field in the FET is not changed, however, 



WPHR 



OUT is moved by the I/O system after a complete logical record has been 
written to tape. Writing continues until there is no data in the buffer or 
until an end -of -file or error condition is detected. No writing will take 
place unless the difference between OUT and IN is greater than the number 
of CM words in the logical record. The user should not move IN beyond 
the header word until the header and the complete record are in place. 
An error will result if SCOPE detects this condition. The format of the 
header word is: 



59 



WPHR lfn, recall 
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No. Bits 
unused 




#CM 
words 
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SCOPE or X magnetic tape only: 

This function causes information in the circular buffer to be written as a 
single physical record on the output device which must be magnetic tape. 
Mode is determined by bit 1 in the first word of Hie FET. 
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If the buffer contains less than 512 (decimal) words, IN and OUT pointers 
in the FET are set to the same value at completion of writing to indicate 
an empty buffer. Only internal to external BCD conversion is performed. 
If the buffer contains more than 512 words when the request is issued, the 
first 512 words are written and IN and OUT pointers are set to show that 
words remain in the buffer. Device-capacity-exceeded status (10) is returned. 

A WPHR function issued for any device other than l/2-inch magnetic tape in 
SCOPE or X format is ignored and an illegal function status (22) is returned. 



With this function, writing depends on file mode and the presence or absence 
of a file index, a working storage area, and the x parameter. In the following 
paragraphs, n represents the number of words in the working storage area. 

WRITOUT WRITOUT takes n words from the working storage area and transfers them 
to the circular buffer, thereby adding them to the logical record currently 
being constructed. If there is no current record, they become the first 
words of a new logical record. If the file is indexed, however, such a 
request is rejected, because the system has no way of knowing which record 
of the file is being addressed. A WRITE request is issued automatically 
when the buffer is full. 

For a binary mode file, the entire working storage area is transferred to the 
circular buffer. In coded mode, trailing blanks are removed and a zero byte 
(end-of-line) is inserted as data is transferred to the buffer. The WRITER 
function may be requested to terminate record writing; but if the file is indexed, 
and no record is being written, the request is rejected. 

If a working storage area is not specified, execution of a WRITOUT request 
has no effect and gives no error indication, unless it addresses a file with a 
name or number index. This request terminates any previous action on the 
file, locates the specified logical record, and sets up the pointers so that 
the next request to continue writing the current record on that file will begin 
with the first word of the specified record. 

1. x is absent: WRITOUT lfn 
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This form of the WRITOUT request adds data from the working storage area 
to the logical record currently being constructed; if the circular buffer con- 
tains no data and the file is indexed, this request is rejected as the system 
cannot determine which record is being addressed. 
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2. x is of the form /name/: WRITOUT lfn,/name/ 
59 29 17 
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name 





This form of the WRITOUT request transfers data from the working storage 
area and adds it to the logical record currently being constructed; if there is 
none in the circular buffer and if the file is indexed, this request will be 
rejected since the system cannot determine which record of the file is being 
addressed. 

3. x is of the form m, where m is a logical record number: 
WRITOUT lfn, m 
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This form of the WRITOUT request begins constructing logical record 
number m on the file named lfn using the words in the working storage 
area as the first words of the record. The file must be indexed, either 
by name or by number. If m = 0, the request will address the record 
with a number one higher than that of the record most recently addressed, 
or record number 1 if the file has not been addressed. The first record 
of an indexed file is number 1; there is no record number 0. 

Requests 2 and 3 above perform the following functions: 

1. Perform a WRITER on the file if its previous status was write, or 
the buffer contains data as a result of a previous WRITOUT. 

2. Set the buffer to empty, and the FET status to write completed. 

3. Set up the random file index and FET to point to the correct 
record. 

4. Transfer the working storage area to the buffer. 

5. Call WRITE if the buffer contains at least one PRU of data. 
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The WRITOUT lfn.m or /name/ statement is used only to begin an indexed 
record. The record can be continued with WRITOUT lfn statements. It 
should be terminated by a 

WRITER lfn 

statement, although if this step is neglected, the next WRITOUT lfn.m or 
/name/ statement for the same file will cause it to be carried out as step 1 
above . 

If the working storage area size is zero, nothing is transferred to the buffer, 
but steps 1,2,3 and 5 above are carried out. 



REWRITE REWRITE lfn, recall 

REWRITER REWRITER lfnj, recall 

REWRITEF REWRITE F lfn, recall 



} 



Mass Storage Only 
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yyy 002 for REWRITE 

003 for REWRITER and REWRITEF 

zzz 214 for REWRITE 
224 for REWRITER 
234 for REWRITEF 

The REWRITE functions make use of a previously allocated file on a mass 
storage device to update records in an existing file without changing its 
index or mass storage allocation. They should be used to replace a record 
in a sequential or random indexed fi le by a record of the same length . A 
knowledge of the structure and record lengths of the file to be rewritten is 
essential. If the rewritten record is shorter or longer than the original 
record, results are unpredictable. The system cannot determine, the length 
of the original record, so there is no protection from over or underwriting, 
nor is a diagnosis of such a condition made. The system guarantees only 
that a rewritten record does not extend beyond Hie end-of-information. It 
issues a diagnostic, the write takes place up to end-of-information, and 
end-of-information indicators are not moved. The user may destroy an 
index previously written on the file. 

Writing always begins at the current position of the file . The file is rewritten 
with information from the CIO buffer. (REWRITE transfers a minimum of 
one PRU of data.) For REWRITER, an end-of-record, level number & is 
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written at the end of the data transferred. For REWRITEF, a logical end- 
of-file (level 17) is written at the end of the data transferred. After 
REWRITEF is used, other data in the file remains allocated to the file; 
therefore an end -of -file may occur in the middle of the file. Rewrite opera- 
tions do not change the storage allocation of the file ; no additional record 
blocks are assigned, nor is the index of a random file modified. It is, in 
effect, a write -in -place operation. If rewrite is used for a common file and 
the job is rerun by operator or user, the data of that common file will not 
be the same as when it was previously used by that job. 



Application of rewriting for sequential files 

Rewriting begins at the current file position. After each request is executed, 
the current file position is updated to point to the PRU that follows the last 
PRU rewritten by the request. A series of REWRITE operations, followed 
perhaps by a REWRITER, can be used to replace a single logical record. 

When a logical record is to be replaced with a record of the same length in 
a single rewrite operation, REWRITER should be used. 



When a record is replaced with a shorter record, the new record might be 
followed by another record which is the last part of the original record. 
For example, if the original record is 120 words (one full length and one 
short PRU) and it is replaced by REWRITER with a 60-word record, the end 
result is one 60-word record followed by another 56-word record (a short 
PRU) which is the second PRU of the original record. 

If a logical record is replaced with a longer record, the new record will 
overwrite more than one record, and part of the surplus might appear as 
a logical record that immediately follows the new record. End-of -information, 
however, is not destroyed. 



Application of rewriting for random indexed files 

Rewriting begins at current file position. A logical record may be replaced 
by a single REWRITER or by a series of REWRITE' s followed by a 
REWRITER. The programmer must reposition the file for each logical 
record to be rewritten. Otherwise, records will be rewritten in the order 
they were originally written — not in index order. 
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To position an indexed file for rewrite of a particular record, the user 
may use one of two methods : 

Set up the file's FET the same as for a random READ; i.e. , insert 
into the Record Request/Return Information field in FET+6 the record 
address found by searching the file's index. 

Use the WRITIN function, which causes the system to search the user's 
index and set the necessary FET fields. (WRITIN will also issue a 
REWRITE request in some cases. Refer to the WRITIN description for 
detail) . 

Once the file is positioned for a record, a REWRITE/REWRITER sequence, 
or a WRITEST/REWRITER sequence, can be executed without further re- 
positioning. The FET+6 field will be cleared by the system after the first 
REWRITE (or after WRITIN) and should remain cleared until repositioning 
for another record is required. 

The methods of rewriting, and the results of underwriting or overwriting 
a logical record are the same as for sequential files. Index integrity, 
however, can be destroyed by the user if he writes shorter or longer records 
than those in the original file. A longer record destroys records originally 
written just after the one being replaced (not necessarily records which appear 
next in the index). A shorter record may create an extra record which is 
not represented in the index. The index is never modified by the system for 
REWRITE. The PRU's and RB's allocated to the file remain assigned, 
though they might contain some useless unaccessible data as a result of re- 
writing with shorter records. Such unused areas can be utilized later when 
a longer record (but shorter than or equal to the original) is rewritten. 
Use of such techniques requires an understanding of the file's logical and 
internal structure. 



WRITIN WRITIN lfn.x 

WRITIN provides automatic index and working storage area management for 
REWRITE. WRITIN is a write-in-place function, unlike WRITE which writes 
at end-of-information. It may be used for indexed or sequential mass storage 
files. The results of a WRITIN request depend on file mode and the presence 
or absence of a file index, a working storage area, and the x parameter. In 
the following paragraphs, n represents the number of words in the working 
storage area. 

WRITIN transfers n words from the working storage area to the circular 
buffer, putting them into the area where the file is currently positioned. 
A REWRITE request is issued automatically when the buffer is full. 
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If the file is in binary mode, the entire working storage area is transferred 
to the circular buffer. If the file is in coded mode, trailing blanks are re- 
moved and a zero byte (end-of-line) is inserted as the data is transferred 
to the buffer. The REWRITER function may be requested to terminate 
writing of a record. 

If a working storage area is not specified, a WRITIN request has no effect 
and gives no error indication, unless it addresses a file with a name or 
number index. In that case, the request will terminate any previous action 
on the file, locate the specified logical record, and set up the pointers, so 
that the next request for REWRITE or REWRITER or another WRITIN (with- 
out x parameter) to continue writing the current record on that file will 
begin with the first word of the specified record. If the next request 
is WRITOUT or WRITIN, the current logical record will be terminated by 
execution of a REWRITER of level before the function is executed. 



x is absent: WRITIN lfn 
59 
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This form of the WRITIN request transfers data from the working storage 
area to the buffer. 



x is of the form /name/: WRITIN lfn, /name/ 
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This form of the WRITIN request begins rewriting the /name/ record on 
the file named lfn, using the words in the working storage area as the first 
n words of the record. The named record must have been written previously, 
so that the file index has the name with a storage address already assigned. 
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3.6.3 

POSITION FUNCTIONS 



x is of the form m , where m is logical record number : WRITIN Ifn , m 
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This form of the WRITIN request begins rewriting logical record number m 
on the file named lfn using the words in the working storage area as the 
first n words of the record. The file must be indexed, either by name or 
by number, and the logical record referenced must have been written 
previously. 



SKIPF 



SKIPF lfn, n,jf, recall 
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SKIPF causes one or more logical records to be bypassed in a forward 
direction. The request may be initiated at any point in a logical record. 
The number of logical records or record groups to be skipped is specified 
by the n parameter; the value 1 is assumed if n is absent. The maximum 
value of n is 777776g. When n = 777777s, a ta P e file is not positioned; 
however, a disk file is positioned at end-of-information. 

If the level parameter (£.) appears, logical records are skipped until an end- 
of-record with a level number greater than or equal to the requested level is 
reached; the file is positioned immediately following the end-of-record mark. 
This positioning process will be performed n times. For example, using the 
illustration shown on page 1-9, a SKIPF lfn, 2, 1 issued while positioned at 
page 6 would cause repositioning to the beginning of chapter 5 (Level Numbers, 
1-3). If £ = 178, skipping is performed until record level 17 or an end-of-file 
mark (tape mark) is encountered. 
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For S and L tapes, if It ^ 17g, the level is assumed to be zero. 

If the level parameter is absent, the I field is set to zero and the file is 
positioned forward n logical records (or partial logical records if the 
SKIPF is issued in the middle of a logical record). 

If the end-of-information is encountered before an end -of -record with the 
specified level is found, the end-of-information status bit will be set. 
Parity errors encountered during a SKIPF operation are ignored. 

On external tapes, level numbers are not appended to records. However, 
level numbers may be specified for SKIPF requests. If the level number 
17 is specified, a skip to end-of-file is performed. For other level numbers, 
one record is skipped. 



Backspace Functions 

Backspace functions will not go beyond the beginning of the current reel of 
magnetic tape. If beginning of reel is encountered before the requested 
number of backspaces, the beginning of information status bit is set. Parity 
errors encountered during backspace operations are ignored. 



Reverse Functions 

Reverse functions will not go beyond the beginning of the current reel of 
magnetic tape. 

If the last operation on a magnetic tape was a write function, trailer label 
procedures will be executed before the reverse motion takes place. For 
X tapes, four tape marks will be written. 
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BKSP 



BKSP lfn, recall 
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The BKSP function causes one logical record to be bypassed in a reverse 
direction. The request may be issued at any point in a logical record. This 
function is a subset of SKIPB; it is included for compatibility with previous 
systems. 



BKSPRU 



BKSPRU lfn, n, recall 
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One or more PRU's are bypassed in a reverse direction. The request may be 
issued at any point in a logical record. If n appears, n PRU's are bypassed. 
If n does not appear one PRU is bypassed. Parity errors encountered during 
a BKSPRU are ignored. 



SKIPB 



SKIPB lfn, n,£, recall 
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SKIPB causes one or more logical records to be bypassed in a reverse 
direction. The request may be initiated at any point in a logical record. 
The number of logical records or logical record groups to be skipped is 
specified by the n parameter; the value 1 is assumed if n is absent. The 



maximum value of n is 777777 ; if n = 777777 



the file is rewound. 
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If the level parameter is used, logical records are read backwards until a 
short PRU of the specified level has been read, A forward read is issued, 
leaving the file positioned after this short PRU. If the file is positioned 
initially between logical records, the logical record immediately preceding | 
the current position is ignored in searching for a logical record of the speci- 
fied level. This positioning process is performed n times. 

Consecutive logical records within a file may be organized into a group by 
using level numbers. The file will be composed of one or more groups of 
logical records. This may be done by choosing a minimum level number 
H ^ and assigning a level number greater than or equal to & to the last logical 
record of each group, and a level number less than ft to all other logical 
records . 

Then SKIPB lfn, ,1 will skip the file backward to the beginning of the logical 
record group which immediately follows a logical record of level I . In the 
example of level numbers shown in section 1.3.2, the minimum level number 
was 1; a SKIPB lfn, 2,1 issued while positioned at page 14 would cause reposi- 
tioning to the beginning of chapter 4. 

If the level parameter is absent, the I field is set to zero and the file is 
positioned backward n logical records (or partial logical records if the SKIPB 
is issued in the middle of a logical record) . 

If the beginning-of-information is encountered before the requested level 
number is found, the beginning-of-information status bit is set. Parity 
errors encountered during a SKIPB operation are ignored. 

On external tapes, level numbers are not appended to records; however, they 
may be specified for SKIPF requests. If level 17 is specified, a skip to 
end-of-file is performed. For other level numbers, one record is skipped. 
For S and L tapes, only levels and 17 are recognized. If I ^ 17, zero level 
is assumed. 



REWIND 



REWIND lfn, recall 
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REWIND positions the file at beginning of first data record or at beginning of 
current reel. A REWIND function on a file already rewound has no effect. 
A REWIND function issued for a closed file or for a device that cannot be 
repositioned causes an illegal function status (22g) to be returned. 
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UNLOAD 



UNLOAD lfn, recall 



COMMON 
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UNLOAD operates in a manner similar to REWIND. If the file resides on 
magnetic tape, the tape is rewound, and then unloaded. 

COMMON addr, recall 
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This function may be used to manipulate common files from a central pro- 
cessor program. A new common file is one which was created during the job 
and has not been detached from the control point. An old common file is one 
which was common at the beginning of job and has since been released by a 
RELEASE card or the COMMON request (n = 2). An old common file is 
treated as a local file except for the RERUN feature. Addr is the address of 
a word in the following format: 



59 



17 



lfn 



lfn is left justified with binary zero fill, n specifies both the function and a 
status reply word. 

Attach or create common file lfn: n = 



n = 1 



n = 3 



Request was completed normally; either a local file lfn 
was changed to a new common file or an unassigned 
common file lfn was attached to this control point. In 
the latter case the job will be marked as unable to be 
rerun. If the file resides on a non-allocatable device, 
the equipment will be requested and reserved until the 
common file is released, 

A common file named lfn is attached to another control 
point, but no local file named lfn is at the calling control 
point. 
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n = 5 

n = 7 

n = 11 
n = 13 

n = 15 



No common file lfn is in the system at present, and no 
local file lfn is at the calling control point. 

Duplicate names; the calling program has a local file 
named lfn and a common file in the system is named lfn. 

A common file named lfn is already at this control point. 

The common file lfn resides on equipment which cannot 
be assigned to this control point. 

The file is a permanent file. 



Release common file lfn: n = 2 

n = 1 Request was completed normally; the common or the new 

common file lfn assigned to this control point will be 
changed to type local at job termination. If the file is an 
old common file the job will be marked as unable to be 
rerun. 

n = 3 Common file named lfn is not at this control point. 

Detach common file lfn: n = 4 



n = 1 



n = 3 



Request was completed normally; the common file or the 
new common file lfn was detached from this control 
point; lfn is no longer available to this control point. 
The job will be marked as unable to be rerun. Opera- 
tion is the same as a CLOSE, UNLOAD, except that no 
index is written. 

Common file named lfn is not at this control point. 



3.6.4 

SYSTEM 

ACTION REQUESTS 



MEMORY 



MEMORY type, status , recall 
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The field length assigned to a job may be obtained or changed by the MEMORY 
request. Control will not be returned until the request is complete. 

type = CM If central memory field length is to be referenced. (t=0) 
type = ECS If extended core storage field length is to be referenced. (t=l) 

If the location addressed by status initially contains zero, no field length is 
altered: the current field length is returned in the upper half of the location 
and bit is set to one. 

If the upper half of the location initially contains a number, the field length 
is altered to equal the value of the number and bit is set to one. 

Bits 0-29 of the location addressed by status should initially contain zero in 
either case. 



CHECKPOINT 



CHECKPT param ,sp 
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param 




sp 





A checkpoint dump may be requested from an executing program. A check- 
point dump is taken when this function is issued. The object program must 
have checked for conditions conductive to a checkpoint dump, such as end of 
reel, x logical records processed, etc. Checkpoint requests may appear 
more than once in an object program. 



param 



sp 



Address of a user-supplied parameter list containing logical file 
names for which a checkpoint is to be made. (See section 8. 1 for 
format of list. ) 

Special process flag that indicates all mass storage files are to be 
processed (sp = zero) or only a limited set of files are to be pro- 
cessed (sp= non-zero). If this parameter is omitted, a checkpoint 
is made for all local files associated with the user's control point. 



RECALL The RECALL request generates one of two calling sequences depending on 
the presence or absence of the lfn parameter. Execution of either function 
causes the job to relinquish the central processor. 
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RECALL lfn 



MESSAGE 



59 




47 


41 


39 


29 




17 







SA1 


lfn 


RJ 


CPC 


000001 


01 




777777 



lfn is the base address of a file environment table. Control returns to the 
program when bit of the code and status field becomes a one, indicating com- 
pletion of an input/output request for that file. Error checking is performed 
and an OWNCODE routine executed, if necessary, before control is returned. 
Since recall may be entered when the operation is initiated if the recall para- 
meter is used, RECALL is needed only if some useful processing can be done 
between initiating and completing an input/output operation. 



RECALL 
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41 


39 
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17 









RJ 


CPC 


RCL 


1 







000000 



When RECALL does not specify lfn, the central processor is relinquished only 
until the next time around the monitor loop. The user must determine whether 
the condition that required a recall is still present. 



MESSAGE addr,x, recall 
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39 
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— 


MSG 








RJ 




CPC 





1 


r 






X 








addr 



The MESSAGE function enters a message into the job dayfile. The message 
must be stored in display code and must not contain any characters with 
display codes greater than 57g (appendix A). The maximum message 
length is 80^q characters because of truncation by the dayfile routine. 
SCOPE considers the message to end either at the first word with all zeros 
in the rightmost 12 bits or at the 80th character, whichever comes first. 
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ENDRUN 



ABORT 



Any characters beyond the 40th appear on a second line. If the x parameter is 
non-blank, the message is displayed but not entered into the dayfile. addr is 
the address of the start of the message. 



ENDRUN 
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RJ 




CPC 





END 


+ 









Execution of the ENDRUN function is the normal way of ending a run. SCOPE 
examines the control card record of the job deck, and begins execution with 
the next unused control card. If there are no more control cards or if the 
next card is an EXIT card, the job is terminated. 



ABORT 



59 




41 


39 


29 




17 
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1 


1 





Execution of this function causes the monitor to terminate the job, just as if 
an error, such as out-of-bounds memory reference, had occurred. If the 
control card section of the job deck contains an EXIT card, the system con- 
tinues processing the job with the next control card after the EXIT card. 



TIME 



TIME status 
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TIM 
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0000 




status 
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Before clearing RA+1, monitor returns in status the job time limit and the 
central processor time already used by the job in the following binary format: 



35 



CLOCK CLOCK status 



11 



TIME limit (seconds) 


CPU time (seconds) 


milliseconds 
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RJ 


CPC 


TIM 


1 




0002 




status 



Before clearing RA+1, monitor returns the current reading of the system 
clock in status, in the following format: 



59 



(* or blank) hh 



mm 



ss 



Character 1 = * if time from deadstart, blank time is entered by operator 
at deadstart. 



DATE DATE status 
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itlflllli 








ISpi 


RJ 





CPC 
status 






TIM 


1 







0001 





Before clearing RA+1, monitor returns in status the current date, as typed 
by the operator, with one leading blank and one trailing blank, 



JDATE JDATE status 
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Before clearing RA+1, the Julian date is returned in status in the following 
format: (yyddd is in display code) 



59 




29 







Zeros 




yyddd 





59 




414039 


35 




29 




23 


17 
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0004 




status 



Before clearing RA+1, the real time clock maintained by monitor is returned 
in status in the following format: 



47 



35 



23 







seconds 
(modulo 4096), 


millisec. 
(modulo 1000) 


milliseconds 



LOADER 



LOADER param 
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iliil^lllP 


mm 


RJ 


LOADER 




param 



A program may request service from the loader with this function. Param 
is the location at which the user has established a parameter list for the 
load sequence. Only the parameters are described below. The loader is 
described in Chapter 4. 

When a job area is initially loaded with program material, a small resident 
is placed within the user's field length. LOADER is an external symbol 
which is satisfied by the loader and which will ultimately reference an entry 
point in this resident. 
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Unlike control card requests for LOADER activity, user requests do not 
cause the specified file to be rewound. Instead it is the user's responsibility 
to position all files properly before issuing a user request. Upon a request 
for a full file load, LOADER loads programs only to the end-of-file. In all 
other cases, the file is searched for the specified programs end-around. 
If all programs are located, the file will be positioned immediately following 
the last program loaded. If not all programs are located, a fatal error flag 
is returned to the user; the PPLOADR will leave the file positioned at its 
original starting point, and the CPLOADR will leave the file positioned at 
end-of-file . 

The load sequence parameter list begins at address param. The list consists 
of one or more 2-word entries, the last of which is followed by a full word of 
zeros. The format of an entry is shown below. 



59 



lr 



17 



lfn (logical file name) 



m 



59 53 47 43 41 39 37 35 



lwa 



si 



fwa 



17 



lfn One of the following: 

Name of file from which programs will be loaded 
(si may or may not be 0) 

Name of an entry point in a program (si = 0) 

Program name (si = 0) 

Zero (si t 0) 

si If non-zero, the location of a list of sections, a segment, or a 

list of subprograms to be loaded as a segment; or if segment 
loading is not requested, a list of subprograms to be loaded from 
file lfn. Names may not exceed seven characters . The list may 
be empty. It is terminated by a zero word. 

Each entry in the si list has the following format: 



59 



17 



subprogram name 
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11 Segment level if s f- and v = 0. Primary overlay level if s = 
and v 4- 0. 

12 Secondary overlay level if v ^ 0. 

r Reset bit. If r ^ all loader tables are cleared before loading; 

normal loading only. 

p Partial map bit. If p ^ a one-line partial core map is given. 

u Library flag. When u ^ 0, and v = 0, si refers to a list of exter- 

nals that are to be satisfied by loading from the system library. 
When u/0 and v ^ 0, an overlay will be loaded from the system 
library. In this case si = and lfn = program name. 
When u^0,v = 0, s^0, and lfn = , si points to a list of sections , 
a segment , or list of programs to be loaded as a segment from the 
library. 

v Overlay flag. If v f- 0, an overlay load operation is requested. 

m NOMAP flag. If m ^ 0, all maps are suppressed. 

k Search key. If k j= 0, lfn is the name of an entry point. The 

search key is used to find the address of a previously loaded 
entry point, and no loading is performed. 

s Segment Elag. If s f 0, a segment loading operation is requested. 

f Fill flag. If f f 0, unsatisfied external symbols are filled with 

out-of-bounds references. 

c Complete flag. If c ^ 0, loading is to be completed by loading re- 

locatable subroutines from the system library. The origin and 
length of blank common will be established. Until loading has 
been completed, the length may vary between subprograms. 

lwa Last location, relative to RA, available for the loading operation 
If lwa = 0, the limit of program loading is the first word of 
LOADER tables stored in core descending addresses starting 
at fwa LOADER. For blank common declarations, lwa is 
designated as RA + fl-20 . 

o 

fwa Initial location, relative to RA, at which to begin loading. If 
fwa = 0, loading begins at the next available location as de- 
termined by the current state of the loading operation. 
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Reply from LOADER 

When LOADER has completed the requested operation (loading is not neces- 
sarily complete) LOADER signals the caller by setting the parameter list as 
follows: 





59 


53 


37 36 35 




17 




Word 1 







Word 2 


I 




ne 


fe 


aa 


ea 







Level at which segment was loaded. L = if segment loading 
not requested. 

Non-fatal error flag, ne f if the following loading errors 
are detected by LDR: 

Unsatisfied externals if c = 1 . 

Duplicate occurrences of a named program; second and 
subsequent occurrences are ignored. 

No entry point for a named transfer. 



fe 



aa 



ea 



Fatal error flag, f e ^ if the following loader errors are 
detected by LOADER. 

Improper deck structure 

Improper parameter specification 

Requested file name, program name, or entry point not 
found 

Entry address, aa = if less than two named XFER's were 
encountered, aa = address of next to last name if more than 
one named XFER was encountered. 

Entry address. If k = 0, ea is the location (relative to RA) of 
last encountered named entry specified in a XFER table. If 
more than one named XFER is encountered, the last one is in 
ea, and the earlier entry in aa. If k = 1, ea is the location 
(relative to RA) of the named entry point. If v ^ 0, ea is the 
entry point to the overlay. If ea = 0, no name was found. 
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If si ^ 0, the list of entry points and/or subroutines to be 
loaded from the library contains the address at which each 
name is loaded. If the name was not loaded, the address is 
zero. The list then has the form: 



59 






17 





name 
1 


addr 


name„ 
2 


addr 


* 

| 






User Request Processing 

Examples of parameter lists to be processed by the loader are given below: 

Load from File: 

lfn = name of file 
si = 
v = 
k = 
s = 

The file is not rewound before loading. If no file is found, the system 
library is searched as in the following example . Subprograms will be 
loaded from lfn until end-of-information is encountered. 1^ and 1 2 are 
ignored. If c ^ 0, loading will be completed. 

Load Named Entry: 

lfn = name of entry point in a subprogram or the name of a subprogram. 

si = 

u = 

v = 

k =0 

s =0 
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The File Name Table is searched first; if found, action is a Load from 
file as in the previous example; if not found, the system library is 
searched. L and 1 are ignored. If c £ 0, loading will be completed. 



Load Segment from File: 

The segment defined by the list at si will be loaded from Ifn at level 1-^. 
If li > current segment level, the segment will be loaded at the current 
level + 1. If 1^ — current level, segments at a higher level will be re- 
moved. If a subprogram specified in the segment list is not located on 
lfn after the entire file has been searched, the fatal error flag will be 
set. lfn is not rewound prior to loading. 

lfn = name of file 

si = address of list, contains a segment name or section names and 
subprogram names only 

l\ = desired level 

u = 

v = 

k =0 

s = 1 

If c = , loading will be completed in that the origin and length of blank 
common will be established. If c ^ 0, loading will be completed normally. 
f /0 will cause unsatisfied external references to be set to out-of-bounds 
references. 

Load Named Subprograms from File: 

The list of subprograms specified by the list at si will be loaded from 
lfn and the System library. 

lfn = name of file 

si = address of list 

1 & 1 ignored 

u = 
v = 
k = 
s = 
If c ^ 0, loading will be completed. 
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Load Overlay from File: 

lfn = name of file 

si = 

l\ = primary level 

12 = secondary level 

u =0 

v = 1 

r, p, m, k, s, f and c are ignored. 

The overlay file (constructed during the initial load from overlay cards 
and binary text) is searched for the unique identifier li, I2. K FWA = 0, 
the overlay will be loaded at the address at which the overlay was 
created, otherwise the load will be at FWA. The absence of such an 
overlay will cause the loader to set the fatal error flag. No map is 
produced. 

Load Overlay from System Library: 

lfn = program name 

si =0 

lj = primary level 

12 = secondary level 

u = 1 

v = 1 

r, p, m, k, s, f, and c are ignored. 



LOADREQ 



LOADREQ, param 
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This request is used to load absolute overlays from the system library or 
a user file . 

The LOADREQ request results in a call to the PP overlay LDV. The func- 
tions of LDV depend upon the value of param: 
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1 . A non-zero param has the same significance as when used in the 
LOADER request (p. 3-56) . LDV examines the two-word entry pointed 
to by param . 

• If the v bit in word 2 indicates that this operation is not an overlay 
load, LDV calls LDR. The results are unpredictable. 

• If this is an overlay and the u bit in word 2 indicates that this is 
from a user file , LDV calls LDR to perform the operation. 

• If this is an overlay and the u bit in word 2 indicates that this is 
from the library, LDV loads into the user's area the CP overlay 
named in bits 18-59 of word 1 of the two-word entry pointed to by 
param. If the named CP overlay does not appear in the library, 
LDR is called to handle the error condition. 

2. If param is zero or omitted, this call is to the loader for loading from a 
file. The name of the file must be specified in RA + 64. LDV calls the 
loader for the load-and-go operation selected by the most recent LOADER 
control card encountered in this job; or if no LOADER control card had 
been used for this job, the loader is selected by default. 

After the CP overlay has been loaded, LOADREQ generates reply information 
for the user in the same format as the LOADER request. 



3.7 

FILE 

PROCESSING The FNT entry for a file in the input or output queue is slightly different from 

other FNT entries. If a file is in either queue the FNT will contain a priority 
field. The priority given to input queue files depends on the priority specified 
on the job card, the length of time the file has been in the queue, and possibly 
the other parameters on the job card. Input queue priorities are used to 
determine the order in which jobs are brought to control points. 

The priority given to a file in the output queue is the priority of the job at the 
time the file was put in the queue. This priority is incremented with time. 
JANUS and other output routines normally process files in order of priority. 
The priority of files in either queue can be changed by an operator type-in. 

In addition to the priority field, the input queue FNT entry contains other 
parameters from the job card including central memory and ECS field length 
requirements and the time limit. Output queue FNT entries contain an addi- 
tional field which specifies how much data is on the file. This number is 
given as a multiple of blocks of 100 8 central memory words. 
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3.7.1 

INPUT 
QUEUE FILES 



Files are placed into the input queue by JANUS, as it reads in jobs from the 
card reader, by other system jobs such as LOAD, LOADX and RESQ, or by 
EXPORT/IMPORT or RESPOND. An input queue file contains the entire job 
which consists of a record of control cards followed by any number of data 
records. Files in the input queue must be type input, assigned to control 
point zero, and have non-zero priority. The file name will be the job name. 
Input queue files are always put on allocatable devices. 



3.7.2 

OUTPUT 
QUEUE FILES 



Files can be put in the output queue by the user when CLOSE, UNLOAD is 
performed on a file or by the system at job termination. Files in the output 
queue must be type local or output, assigned to control point zero, and have 
non-zero disposition and non-zero priority. The file name is the name of the 
job which created the file. Files are always rewound before they are put into 
the output queue. 

A file will not be put in the output queue unless it is on an allocatable device 
since JANUS and other output routines cannot handle non-allocatable files. 
A random file can be put in the output queue; however, JANUS handles random 
files sequentially. The categories of local files which may be attached to the 
control point of a running job are described below. 



3.7.3 

INPUT FILE 



When a job is brought to a control point, the input queue FNT entry is changed 
so that the file is assigned to the control point, has the name INPUT, and is 
type local. The input file is still the same file as the input queue file. It 
contains the control card and data records and it resides on an allocatable 
device. Since the input file contains the control cards for the job , it is illegal 
to CLOSE the input file; any attempt to do so will be ignored. SCOPE main- 
tains special pointers to the control card record on the input file. Normal 
operations such as READ or REWIND on the input file do not affect these 
pointers. The user can, however, call the system macro, CONTRLC, which 
can change the pointers to the control card record , and can affect the order 
in which control cards will be processed. 

The user should never write on the file INPUT or detach it from his control 
point, although it is possible to do both. In the first case, the user could 
destroy the control card record; in the second, the entire file could be des- 
troyed or lost. 
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3.7.4 

OUTPUT FILE 



The output file is a local file at the user's control point with the name 
OUTPUT. When an error condition occurs, the system will dump to the out- 
put file the exchange package and 100g central memory locations before and 
100g after the address to which the P register pointed at the time of error. 
At job termination, the dayfile is copied to the end of the output file (unless 
the job has been terminated by KILL, in which case no output is produced). 

If no output file exists , the system will create one . The output file will 
always be on an allocatable device since it is illegal to request OUTPUT with 
either the control card or macro. Any attempt to do so will terminate the 
job. 

When it is time to dispose of the OUTPUT file, it is treated as a special 
name file. Unless the user specified a disposition code, the file will be given 
print disposition and be placed in the output queue. If an output file is dis- 
posed of by a CLOSE, UNLOAD it is put into the output queue with type local. 
At job termination the output file is put into the output queue with type output. 
Therefore only one file for each job can have type output and that file will 
contain the dayfile for the job . 



3.7.5 

SPECIAL 
NAME FILES 



Several other file names are treated as special cases. The user can specify 
disposition for these files and that disposition will be honored; however, if a 
local file with one of the special names has a zero disposition code, the sys- 
tem will automatically set the disposition code to an appropriate value before 
disposing of the file. 

Names treated as special cases are the following: 



OUTPUT 
PUNCH 
PUNCHB 
FILMPR 



FILMPL 
HARDPR 
HARDPL 
PLOT 



3.7.6 

NON-ZERO 

DISPOSITION 

FILES 



All local files which have disposition set by the user and all special name files 
which have disposition set by the system will be rewound and placed in the 
output queue at disposal time if they reside on allocatable devices. 



60189400 Rev. I 



3-65 



3.7.7 

NON- 
ALLOCATABLE 
FILES 



If a local file resides on a non-allocatable device it will be dropped (its FNT 
zeroed) at disposal time regardless of its name or disposition code. It will 
not be put into the output queue because JANUS and other output routines can- 
not process non-allocatable files. 



3 7 8 

COMMON 



FILES A user can change the type of any local file to common if it is attached to his 

control point and is neither a permanent file nor a private disk pack file. 

He can also attach an existing common file to his control point. If a common 
file is not being used, it will be attached to control point zero. A common 
file may be on an allocatable or non-allocatable device , it may have a special 
name , and it may have non-zero disposition. 

When it is time to dispose of a common file , the file is assigned to control 
point zero and made type common regardless of its name, disposition code, 
or the type of device on which it resides; however, the disposition code is 
saved and when the file is released and made local, it is treated as a special 
name file or a non-zero disposition code file if appropriate. 



3.7.9 

PERMANENT 
FILES 



A permanent file can exist across deadstarts. The file and sufficient infor- 
mation to access the file is maintained on a mass storage device. An FNT 
entry is made for a permanent file only when the file is attached to a control 
point; it will be type local and will be marked as a permanent file. A perma- 
nent file can never be assigned to control point zero. 

At job termination, a permanent file is disposed of by deleting its FNT entry 
and releasing its RBT chain. The file will still exist on the mass storage 
device. A CLOSE, UNLOAD on a permanent file also saves the file but 
deletes the FNT. A special name or a non-zero disposition for a permanent 
file is meaningless and is ignored. 

A user can completely remove a permanent file from the system with the 
PURGE command. The mass storage space occupied by the file will be 
released. 

A permanent file cannot be used as a common file ; any attempt to do so will 
be ignored, and a non-fatal error message will be issued. 



3-66 



60189400 Rev. I 



3.7.10 

PRIVATE DISK 
PACK FILES 



A disk pack unit may be designated as public or private. A public unit is 
treated the same as any other mass storage device; it may contain one or 
more files of various types assigned to different control points. 

A private disk pack unit is treated somewhat like a magnetic tape. The unit 
can be assigned to a control point with the RPACK control card, and it may 
contain one or more files associated with the control point. A private disk 
pack unit cannot be attached to control point zero. The REQUEST control 
card must be used to create a file on a unit attached to a user's control point. 
The name on the REQUEST card cannot be one of the special names; if it is, 
the job is terminated with a control card error. 

When a private disk pack unit is attached to a control point an FNT entry is 
made for each file on the unit as well as one FNT entry for the unit itself. 
The latter is marked so a file on the pack can have the same name as the 
pack. The files will be type local and will be assigned to the control point. 

A private disk pack file cannot be made type common or put into the output 
queue. If a user gives a disposition code to a private disk pack file, it will 
be ignored. At job termination information about each private disk pack file 
(such as name and physical disk locations used by the file) is written to the 
disk pack; and the file itself remains on the pack; but the FNT entry for each 
file is deleted from the FNT. The FNT entry for the pack is also deleted. 

Other entries in system tables refering to the private pack files arc deleted, 
and the equipment is detached from the control point. 

To eliminate a file from the private disk pack and from the system, the 
REMOVE control card is used. 



3.7.1 1 

RANDOM FILES 



If a random file is to be saved, the file index must be written as the last logi- 
cal record on the file. A user may write the index himself or he may call the 
system macro CLOSE or CLOSE, UNLOAD to write the index for him. 
CLOSE automatically writes out an index for a random file if the file security 
is open, write or open, alter. A permanent file must also have EXTEND 
permission. 

If the user neglects to write out the index on a random file or an error termi- 
nates the job before he has a chance to do so, the system will write out the 
index if the file satisfies all the following conditions: 

File must be random and open for write or for alter. 

The FET indicated by the pointer in the FNT must appear valid. (The 
random bit must be set, the FNT pointer must be correct, the index 



60189400 Rev. I 



3-67 



length must be non-zero, and the address of the last word in the index 
must be less than the field length.) This is to prevent the system from 
writing out the index if the index and the FET which points to the index 
have been destroyed. 

The file must be permanent with EXTEND permission, a common file, 
or a private disk pack file. 



3.8 
FILE 

DISPOSITION When jobs terminate, the method of file disposal varies according to the 

circumstances that cause termination. 



3.8.1 

NORMAL 

TERMINATION 1. All local files with non-zero disposition code (including output and other 

special name files) which reside on allocatable devices are rewound and 
put into the output queue by changing the file name to the job name, and 
assigning the file to control point zero. 

2. All common files are assigned to control point zero with type common. 
They are not rewound. If a common file is on a non-allocatable device, 
the equipment is dropped (detached from the control point) and set to 
logically off to prevent its assignment to another file. 

3. All FNT entries for permanent files at the control point are deleted. 

4. All FNT entries for private disk pack files and the FNT entry for the 
disk pack unit are deleted from the FNT. Information identifying each 
file is written on the disk pack and the equipment is detached from the 
control point. 

5. The index is written out prior to disposing of a file if it is random, open 
for write or alter, has a valid FET, and if the file is one of the following: 

permanent file with EXTEND permission 
private disk pack file 
common file 

6. All other files, including the input file, local files with zero disposition, 
and local non-zero disposition files on non-allocatable devices are 
dropped. This involves deleting the entry in the FNT for the file, 
releasing any reserved mass storage space on an allocatable device, or 
dropping the equipment if it is non-allocatable. A file on a non-allocata- 
ble device remains at its current physical position. 
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3.8.2 

KILL 



When the operator types in n. KILL at the control point, the job terminates 
and all local files associated with the job, including the output file, are 
dropped regardless of name or disposition. Permanent files , private disk 
pack files, and common files are treated as for normal termination. An 
index is written if appropriate. No files are put into the output queue. 



3.8.3 

RERUN 



When the operator types in n. RERUN at the control point, the job is termi- 
nated and returned to the input queue, so that it can be run later. Files 
associated with the job are handled as follows: 

The input file is returned to the input queue. Its file name will be the 
job name and it will be type input at control point zero. 

The output file is dropped and a new output file is created. The job day- 
file is copied to the new output file which will not be rewound, but made 
local at control point zero; the file name will be the job name. It is 
called a pre-output file, and becomes an output file when the job is run 
again. The output file for the rerun job will contain the dayfile from the 
first partial run of the job and the output and dayfile from the second 
complete run of the job. 

Any files attached to the job's control point that were common at the 
start of the job are returned to control point zero as common files even 
if they had already been released by the job. If they are random files 
and meet the other requirements, the index will be written out. 

Common files created by the job are dropped. 

Permanent files and private disk pack files are treated as for normal 
termination. If they meet the requirements, an index will be written out. 

All other files, regardless of name or disposition, are dropped. 



3.8.4 

NO RERUN 



In some cases, a job might perform a function which would make it impossible 
to restore conditions to their initial state (before the job was run). For 
example, if a job writes on an existing common file, that information cannot 
be erased. Trying to rerun such a job could have bad effects , and therefore 
RERUN should be prevented on such a job. The no-rerun flag can be set in 
the control point area. If set, the operator type-in n. RERUN will be rejected. 
The no-rerun flag will be set in the following cases: 

1. The user attaches an existing common file to his control point 

(because it cannot be determined if information has been written on 
the file) . 
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2. The user detaches a common file from his control point with 
CLOSE, UNLOAD or COMMON macros, or the RETURN control 
card. 

3. This is a RESPOND job. 

4. The job has attached a permanent file to its control point with 
EXTEND, MODIFY, or CONTROL permission, or has cataloged a 
file. 

3.8.5 

DISPOSAL 

PRIOR TO 

TERMINATION Prior to job termination a user can dispose of any file attached to his control 

point by calling the system macro CLOSE, UNLOAD, or by using the 
RETURN control card. A common file can be disposed of by calling the sys- 
tem macro COMMON. After the user disposes of a file, he may create and 
reference a new file with the same name. 

CLOSE, UNLOAD 

The system macro CLOSE can include the parameter UNLOAD to specify 
disposal of a file at the user's control point. Files disposed of in this 
way are handled as for normal job termination with the following 
exceptions: 

1. CLOSE cannot be used for the INPUT file. 

2. A sequential file is rewound. 

3. A file on magnetic tape is physically unloaded. 

4. A file on a private disk pack is locked. 

5. CLOSE .UNLOAD (or any other CLOSE) will write out the index 
to any non-permanent random file which is open for write or 
alter with EXTEND permission. 



RETURN 



The RETURN control card can be used to dispose of a file at the user's 
control point. RETURN will perform a CLOSE, UNLOAD on the file. 



COMMON 



The system macro COMMON can be used to dispose of a common file at 
the user's control point. Disposal is the same as in normal termination. 
If the file referenced in the call is not type common, no action is taken, 
but an error indication is returned to the user. 



3-70 60189400 Rev. I 



3.8.6 

BUFFER 



EMPTYING The system will empty the buffers of certain files before disposing of them. 

A write end-of-record will be issued to write any information still in a user's 
buffer onto the associated file. Buffers are emptied when a job terminates 
and the error flag is not KILL or RERUN; or when an error (other than KILL 
or RERUN) occurs which does not cause termination because the job contains 
an EXIT card followed by more control cards. 

In the former case, the system will empty the buffers as described above. 
In the latter, the system will empty the buffers, process the error condition, 
and continue processing cards after the EXIT card. A CLOSE, UNLOAD will 
not empty the buffers. 

Files with non-zero disposition (including output and other special names) are 
emptied if they meet all the following conditions: 

The last code and status in the file's FNT indicates that the last operation 
on the file was an OPEN, WRITE (with or without rewind) or any type of 
write (WRITE, WPHR, WRITER, WRITEF). 

The FET pointer in the FNT points to an FET with the same name as the 
file name. 

The buffer is not empty. 

For common files, buffers are emptied regardless of disposition. 

The FET pointer in the FNT points to the address of the FET used in the last 
I/O operation. If a user has two FET's for a file, it may not be possible to 
determine which buffer is emptied. 



3.8.7 

EXPORT/IMPORT 
AND RESPOND 



Files associated with EXPORT/IMPORT and RESPOND jobs are handled as 
described below: 



EXPORT/IMPORT 

When files attached to an EXPORT/IMPORT job are disposed of by the user 
or the system, they are handled the same as for a normal job, except that 
4000 8 is added to the disposition codes of all files placed in the output queue. 
Files in the input queue with disposition codes of 4xxx 8 are ignored by 
JANUS, as they are picked up by the EXPORT/IMPORT package. In some 
cases , the EXPORT/IMPORT package may reset the disposition so that 
JANUS will process the output. 
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RESPOND 

If the user disposes of a file attached to a RESPOND job, the file is treated 
normally. All others, except for the output file, are disposed of by the 
RESPOND package at end of job. The output file will be put into the output 
queue with 2000 8 added to its disposition. JANUS will ignore the output file, 
as it will be picked up by the RESPOND package. 
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LOADER OPERATION 



The relocatable loader provides high-speed transfer from input and storage 
devices to central memory. Initially, the loader is called by SCOPE control 
cards; later it may be called from an object program. 

The two loaders included in this system may be selected with a control card. 
If the user does not select a loader , the system selects it by default. Loaders 
are specified by a name of 1-7 alphanumeric characters; PPLOADR and 
CPLOADR are currently available. These loaders are externally compatible 
except for file positioning at the end of selective load operations (described 
under LOADER request, section 3.6.4) and the lack of recognition of code 
assembled at absolute origins by the CP loader (section 4.5.1). Both loaders 
function as follows: 

Subprograms assembled or compiled independently, in absolute or relo- 
catable binary, may be loaded and linked to one another or to library 
subprograms by the loader. The loader issues diagnostic messages on 
the dayfile and prints memory maps when requested. 

A number of subprograms may be grouped together as a segment to be 
loaded, linked and, upon request, later delinked and removed as a unit by 
the loader. The loader can also generate overlays which are written out 
to a specified file in absolute format. These overlays may then be loaded 
by a smaller, faster version of the loader. 

These features are governed by control cards , loader requests from 
object programs, and a standard relocatable subprogram format. 

4.1 

LOADING 

SEQUENCE Loading for PPLOADR proceeds in the following general manner: I 

1. The loader may be called by the user program or as a result of con- 
trol card requests. 

2. The initial control card results in loading of the PRU routines, LOD, 
LDR, and a CPU routine, LOADER. 

3. LDR handles all loader input/output and relocation to central memory; 
LOADER handles all bookkeeping, routine linking and delinking. 
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4. The combination of these two routines, hereinafter referred to as 
the loader, processes specific requests in the parameter list on the 
control card or in the user program. These may be: 

a. Build segment definition tables 

b. Build section tables 

c. Prepare overlays and write them out to a defined file 

d. Load absolute programs 

e. Load relocatable program texts 

f. Load segments 

g. Load overlays 

(d and e are subset functions of g and f , respectively.) 

5. Programs can be loaded from more than one file (including the 
system library) for a single job. 

6. During loading, all external reference points and entry points are 
linked together as described in appendix D. Duplicate entry points 
produce anon-fatal diagnostic. 

7. At completion of load and at the user's discretion, all unsatisfied 
references are filled with references to entry points in relocatable 
routines from the system library or by out-of-bounds references. 

8. During loading, a memory map is created for all programs other 
than main programs loaded from the system library (such as 
FORTRAN, etc.). 

9. Loading is completed upon appearance of an EXECUTE or NOGO 
card. NOGO inhibits program execution and is used primarily to 
provide a map of the program. Subsequent loading following the 
NOGO will begin as if no programs had been loaded prior to NOGO. 
An EXECUTE card causes control to transfer directly to the loaded 
programs. 

10. Loading of OVERLAYS by normal or segment jobs, or the converse, 
is not prohibited by LOADER. However, extreme care must be 
exercised in the allocation of core and communication between 
component programs. The loading of absolutely "original" code is 
also permitted but can result in complex situations when accom- 
plished in overlays and segments. 
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CPLOADR operates primarily in the central processor within the user's 
field length. Within CPLOADR the following functions are reserved for 
the central processor: 

Text relocation 

Loader table generation 

Loader table processing 

Linking 

Replication 

Labeled and blank common assignments 

Library loading 

Issuing I/O requests to PP routines 

Segment handling operations (including delinking) 

Overlay generation 

Overlay loading 

Issuing maps and error diagnostics 

Components of the central processor portion of the loader follow: 

LOADERQ Main module, for loading overlays, relocatable programs 
and library subroutines in normal load operations . 

LOADERS Used when segment loading is in operation. 

LOADERV For overlay generation. 

LOADERE For fatal errors. 

MAPOUT For editing full maps. 

Functions of peripheral processor components of the loader follow: 

LOQ Load main central processor module, LOADERQ. 

LDQ Called by LOADERQ for: 

Reading input files from mass storage into central 
memory buffer 

Reading library directory into user's field length 

Reading relocatable subroutines from library into user's 
central memory buffer 

Reading central processor time spent in loading for map 
output 

Checking validity of loader directives (SEGMENT, 
OVERLAY, etc.) 
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Other peripheral processor routines called are: 

CIO Called for: 

Reading input files from tape into central memory buffer 

Reading input files from any device into central memory 
for selective load from a file 

LDR Called as a result of a user request to load an overlay 

from input file (device independent) or system library. 

The control cards described in section 2 and the user request formats 
described in section 3 have the same significance to CPLOADR as they do 
to PPLOADR. 

4.2 

SEGMENTATION A segment is a group of relocatable subprograms which are to be treated as a 

unit by the loader. Segmentation allows the user to add programs as they are 
required and to eliminate those no longer required during the execution of his 
job. The user defines subprograms to be included in a segment with loader 
control cards or with parameters included in the object program loader call. 
To facilitate reference to groups of programs , a segment definition may con- 
tain both program names and section names. A section is a convenience in 
the loader scheme to reduce the number of program names appearing in 
segment calls. 

Segments are loaded at levels ranging from 0-77 g . Level zero is reserved 
for the initial, or main, segment. Segment zero must be the first segment 
defined; thereafter segments may be defined and loaded at any level. 

When a segment is loaded, external references within the segment are linked 
to entry points in segments previously loaded at a lower level. Unsatisfied 
external references may be linked to entry points in segments loaded sub- 
sequently. Optionally, the user may specify that unsatisfied external re- 
ferences be satisfied, if possible, from the system library, thereby 
nominally including certain library subprograms within a given segment. If 
the level requested for loading a segment is less than or equal to the level 
of the last loaded segment, the loader performs a delinking operation. All 
segments previously loaded at a level equal to or greater than the presently 
requested level are removed and all linking of external references to entry 
points within these segments is eliminated, causing the external references 
involved to become unsatisfied again. Once delinking is complete, the seg- 
ment is loaded at the requested level. 
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Ordinarily, only one occurrence of a given subprogram or entry point is 
loaded since all segments are linked to that subprogram. However, a user 
may force subsequent loading of an already loaded subprogram by explicitly 
naming it in another segment to be loaded at a higher level. Thereafter, 
all external references in higher level segments would be linked to the last 
loaded subprogram. 

Example : 

The SINE routine is loaded in a segment at level 1 . To try an experi- 
mental version of SINE, the user loads a new segment containing SINE 
at level 3. Now, although any references to SINE occurring at level 2 
will be linked to the entry point in level 1, all segments loaded at level 
4 or higher will be linked to SINE at level 3. This will occur until level 
3 is delinked and removed as described above or until yet another SINE 
is loaded at a higher level. 

Labeled common block references are established between programs in a 
given segment but not between segments . Therefore, delinking is not re- 
quired. Blank common references are established between programs within 
a segment and also between segments . The origin and maximum blank 
common length is established in the first segment which declares blank 
common. If this segment is ever delinked, blank common will be re-estab- 
lished in the next segment loaded which declares blank common. The 
following diagram shows the storage allocation in core resulting from the 
loading of several segments: 



Loading 
Order 


Segment 
Level Loaded 


Contents of User's Area After the 
Segment is Loaded 


1 
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4.3 

OVERLAYS The loader provides the facility to subdivide a large task into portions, called 

overlays, and write them out in absolute form. These overlays can then be 
loaded at execution time without a relocatable loading operation. The resident 
loader for overlays is substantially reduced in size and may be easily retained 
with the job for subsequent loading. Overlays are generated through control 
cards processed directly by this loader (loader directives). 

Each overlay is identified by an ordered pair of octal numbers, 0-77. The 
first number denotes the primary level; the second denotes the secondary level. 
A secondary overlay (non-zero secondary level) is associated with a sub- 
ordinate to the primary which has the same primary level and a zero second- 
ary level. Overlays (1,1), (1,2) and (1,3) are secondary overlays of the 
primary (1,0). 

The initial, or main overlay, must be primary with level 0,0. It cannot have 
any associated secondary overlays; overlays numbered 0,1; 0,2; etc. , are 
illegal. The main overlay remains in memory throughout the job. For any 
given program execution, all overlays must have unique identifiers. 

Primary overlays all begin at the same point immediately following the main 
overlay (0,0). The loading of any primary overlay will destroy any other 
primary overlay. For this reason, LOADER will not return CP control to the 
instruction following the LOADER call. Instead, control will be transferred 
to the entry point of that overlay. 

The origin of secondary overlays immediately follows their associated 
primary overlay, and they may be loaded only by their primary overlay or by 
the main, overlay. The loading of a secondary overlay destroys any previously 
loaded secondary overlay. No more than three overlays are available to 
the user at one time: the main overlay, one primary, and one secondary. 

When the loader detects illegal overlays during preparation, because of 
erroneous identification or size, an abort flag is set which causes the system 
to bypass the next EXECUTE or NOGO card. 
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The following example shows the storage allocation in core during an overlay 
loading operation: 



Loading 
Order 


Primary 
Level of 
Overlay 


Secondary 
Level of 
Overlay 


Contents of User's Area After this 
Overlay has been Loaded 


1 








(0,0) 


Must be first loaded overb 
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1 





(0,0) 


(1.0) 
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1 


1 


(0,0) 


(1,0) 


(1,1) 
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(1,3) 
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2 
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(2,2) 
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2 
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(0,0) 


(2,0) 


(2,1) 


8 


4 





(0,0) 


(4,0) 









4.4 

LOADER 

DIRECTIVES 



The following control cards are interpreted by the loader as directives for 
the loader execution. They may be interspersed with tables but may not be 
interspersed with cards making up a table. 



4.4.1 
OVERLAYS 



OVERLAY (lfn, L 1( L 2 , Cnnnnnn) 

lfn is the file name on which the overlay is to be written; the first overlay 
card must have a named lfn. Subsequent cards may omit it, indicating that 
the overlays are related and are to be written in the same lfn. A different 
lfn on subsequent cards results in the generation of overlays to the new lfn. 
The source file for overlay generation may not be used as the lfn on 
any overlay cards. Loader writes the first overlays to the output file 
before all overlays on the source file have been processed. L^ is the 
primary level number in octal; L 2 is the secondary level number in octal. 
Lj_, L 2 for the first overlay card must be 0,0. 

Cnnnnnn is an optional parameter consisting of the letter C and a six -digit 
octal number. IE this parameter is present, the overlay will be loaded nnnnnn 
words from the start of blank common. This provides the programmer with 
a method of changing the size of blank common at execution time. Cnnnnnn 
cannot be included on the overlay 0,0 loader directive. If this parameter is 
omitted, the overlay is loaded in the normal manner. 
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OVERLAY DECKS 



The data, relocatable binary decks immediately following OVERLAY up to the 
next OVERLAY control card or an end-of-file, comprise the overlay deck. 
When the overlay deck has been loaded, loading is completed by satisfying 
undefined external references from the system library. The overlay and its 
identification are written as the next logical record in the file . Writing to 
the overlay file takes place when a directive is encountered which specifies 
an overlay level which would overlay a level currently residing in memory. 
Writing also takes place when the last overlay has been created. 



Each overlay has a unique entry which is the last transfer address (XFER) 
encountered in the overlay subprograms during preparation. External re- 
ferences which cannot be satisfied, even by the system library, result in 
job termination after loading is completed and maps are produced for all 
overlays. References to entry points in the main overlay may be made from 
primary and secondary overlays. References to entry points in a primary 
overlay may be made only from an associated secondary overlay. Similarly, 
common blocks defined in a lower level overlay can be referenced from a 
higher level overlay. Data can be preloaded into a labeled common block if 
the overlay which defined the common block has not been written to the over- 
lay file. 



OVERLAY FORMAT 



Each overlay consists of a logical record in absolute format. The first word 
is an identification. Words 2 through end of logical record are data words. 



Contents 



5000 


h 


L 2 


fwa 


ea 



Bits 



59 



47 



41 



L, primary overlay level 
L 9 secondary overlay level 



33 17 

fwa first word address of overlay 
(overlay is loaded at FWA) 

ea entry point to the overlay 
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4.4.2 
SECTIONS 



This card defines a section within a segment. Segments are loaded by user 
calls during execution or by the loader during initial load. 



SECTION (sname, pn ,pn , 



»pn ) 
n' 



sname is the name of the section and pn. are names of subprograms belonging 
to the section. If more than one card is necessary to define a section, 
additional cards with the same sname may follow consecutively. All names 
must be a maximum of 7 alphanumeric characters. 

All subprograms within a section are loaded whenever the named section is 
loaded. All section cards must appear prior to the SEGMENT cards which 
refer to the named sections. 



4.4.3 

SEGMENTS 



All programs requiring segmentation loading must contain the SEGZERO card 
and all SECTION and SEGMENT cards before any of the binary text. 



4.5 

MEMORY 

ALLOCATION 



SEGZERO (sn.pn ,pn , 



,pn n ) 



sn is the segment name and pnj are names of subprograms or section names 
which make up the main or zero level segment. Defining other segments in a 
similar manner reduces the list of subprograms in the loader call. All names 
must be a maximum of 7 alphanumeric characters. 



SEGMENT (sn, pn , pn , 

J. Zx 



.pn n ) 



The parameters are defined as in SEGZERO. In a segment, all programs 
must reside on the same file. A segment defined in the user's program 
need not be defined by a SEGMENT card; however, a SEGZERO card is 
always required. 



4.5.1 

SYSTEM USAGE 



Storage areas are allocated within the user's declared field length in contig- 
uous memory locations. The first 100 locations of the area are automatically 
assigned as follows: 
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+0 

+1 

+2 



89 






II 


5 00 


(not to be set by any CDC routine) 


g 


Sense 
Switches 


Sense 
Lights 


User/System Interface 













^1 



+63 
+64 
+65 
+66 
+67 
+70 



+76 

+77 



Parameters from Program Call Card 



Program or File Name 



Segment Table Pointer 



FWA Loader Tables 



S.OFLAG 



Reserved 



MI O S T C L OVLVL 2d 



PEQ MRCT 



2221 



FET Pointers 
(FORTRAN) 



No. of Parameters 



Next Available CM 



FWA of User Object 
Program 



FWA Loader 



31 29 27 



Card Image 



oo 

A 



In the above diagram RA+64 through RA+67 are reserved for the SCOPE 
system -loader interface and bytes are assigned as follows: 



2d 

OVLVL 

CT 

II 

M 

Q 

E 

S.OFLAG 



g 

A 

P 
S 
T 



Indicator for loader directive 

Level of incoming overlay 

Control card type NOGO, LOAD, EXECUTE, PROGRAM 

RSS mode indicator 

No map flag for library load 

Request flag - communication between LDR and LOADER 

End of load flag 

Segment - FWA of tables for lowest segment in user's 
job area 

Overlay - FWA blank common 

GO/PAUSE flag; =GO, 1 = Pause, wait for GO 

ASA flag (used by RUN2. 3) ; - not ASA; -0 = ASA 
FORTRAN does not use 70-76(7) in the card image manner 

Partial map flag 

SNAP 

TRACE 
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C Change dump 

L Labeled dump 

O REDUCE (OBESE) flag 

MP Map flag: 001 = Full map, 010 = No map, 100 = Partial map 

Card Upon initial entry from a named routine call or an EXECUTE 

image card, these locations will contain the card image (in display 

code) of the card which called for execution. 

If a SECTION card appears prior to an initial loading operation, a section 
definition table (SDT) is started at RA+lOOg otherwise the user's first loaded 
subprogram is started at RA+lOOg. The origin of the user's area can be 
found in bits 0-17 of RA+66g. 

Absolute programs on the system library which are loaded by program call 
cards are loaded at location BA+lOOg regardless of the declared origin of the 
program. Relocatable programs are loaded originally at RA+100g. The 
origin of a program made absolute by COMPASS must be location 101 as 
COMPASS places a control word in front of the first location. 

The system establishes loader tables at the high end of the user's field length 
area. The user must provide space for the loader and the loader tables in his 
field length declaration. (An additional 5000g is usually sufficient .) Blank 
common may overlay the loader and its tables; conversely, if the loader is 
called again it may overlay blank common. It is the user's responsibility to 
assure that this field length is long enough to accommodate the loader, its 
tables, and blank common if he is concerned with preservation of data. 

The CP loader uses memory beyond the last loaded address of the user's 
programs for mapping purposes. Code assembled by COMPASS at absolute 
origins is not included in the range of that last address. Therefore such code 
may be destroyed by the loader. The PP loader does not have this restriction. | 

There are no guarantees that the programmer cannot destroy the loader or 
loader tables. Both areas are checksummed and the checksum is verified 
upon initial entry into LOADER. If this initial verification routine is des- 
troyed the results of RJ LOADER are meaningless. 
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4.5.2 

USER ALLOCATIONS 



The subprogram and associated labeled common blocks are assigned memory 
as they are encountered. Blank common relocation information is preserved 
until loading is completed, at which time it is allocated following the last 
loaded program and/or labeled common block. 

The initial declaration of a labeled common block establishes the maximum 
length for that data block. Length declarations in subsequent programs must 
be less than or equal to the original declaration. A diagnostic occurs if this 
rule is violated. 

Declarations of blank common may vary between subprograms, and the 
largest declaration determines the memory allocation. 



4.5.3 

SEGMENT 
ALLOCATIONS 



After a segment is loaded, the current loader tables are moved to a point 
immediately following the last loaded subprogram/common block. 

The user must allow for the space consumed by the loader table within his 
field length definition. 



4.6 

MEMORY MAP 



Following completion of loading, an optional map of the user's area may be 
produced in the OUTPUT file. The map includes: 

Names, lengths, and locations of entry points with a sublist of all 
programs referencing the entry point 

Names and locations of common blocks 

Total length of all loaded programs and common blocks 

Length of the loader and its tables 

Unsatisfied external references 

During execution of a segmented or overlay job, a record of a new segment 
or overlay load is provided each time a call is made to LOADER. This map 
can be suppressed by setting the NOMAP bit in the LOADER parameters to 1 . 
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4.7 
ERRORS IN 

ASSEMBLE 

COMPILATION Errors encountered in assembly and compilation do not automatically cause 

the system to terminate a job. Rather, the job is terminated when the user 
attempts to load the assembled program. The loader recognizes the directive 
ERRORS, which is produced in the first record in the first character position 
on the binary output file. ERRORS IN ASSEMBLY, is produced by COMPASS, 
ERRORS IN RUN COMP. is produced by RUN. To avoid indiscriminate 
dumping of system routines, such as LOADER, COMPASS, etc. , EXIT proc- 
essing will not occur if the ERRORS directive caused termination; that is, 
control cards following an EXIT card will not be processed. When the EXIT 
card contains an S parameter: 

EXIT(S) 

EXIT processing will occur in all cases. 
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SYSTEM LIBRARY PREPARATION AND MAINTENANCE 



The SCOPE system library includes system routines , library maintenance and 
utility routines, members of the SCOPE product set such as COMPASS, 
FORTRAN, COBOL, etc. and coded records. 

The EDITLIB program creates and maintains the SCOPE library. Modifica- 
tions may be applicable to only the currently operating environment or they 
may be permanent changes to a system library deadstart load tape. 

The library material may be in three forms: 

• System library tape, which may be deadstart loaded, 

• File called SYSTEM on mass storage, which is virtually a copy of a 
system library tape after deadstart loading is completed. Parts of 
SYSTEM will also have been copied into central memory; in particu- 
lar, library programs that are to be available from CMR. 

• Files containing one or more logical records in a form suitable for 
insertion into SYSTEM or a system library file. 

The released system library consists of 18+n records followed by an end-of- 
file, where n is the number of programs and overlays in the library. Any 
installation, however, may expand the 18 records to 25 since the SCOPE 3.2 
system permits up to eight different CMR records on the library to correspond 
to eight different equipment configurations at an installation. The released 
SCOPE 3.2 system has only one CMR record on it. If the installation places 
additional copies of CMR on its system tape, the number of records preceding 
the library programs will increase by one record for each additional CMR. 
The programmer should modify the parameters in his EDITLIB control cards 
if necessary to match his installation tape. 

Name/Record No. Description 

CEA 1 PPO save program. If the save switch on the deadstart 

panel (word 7, bit 2) is down (set to 0), PPO is copied 
to central memory (starting at IP. SVADR) allowing the 
contents of PPO to be dumped by the deadstart dump 
program. 

Deadstart control program 

Deadstart dump program 

Central memory resident (up to eight copies allowed) 

Deadstart equipment reconfiguration program 
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CED 


2 


D 


3 


CMR 


4 


EST 


5 



Name/Record No. 



IRP 


6 


5CP 


7 


5CQ 


8 


5CR 


9 


5CS 


10 


5CT 


11 


P 


12 


STL 


13 


IRCP 


14 



MTR 15 



DSD 16 



17 



18 



19 and 
follow- 
ing 



Description 

Deadstart I/O control program 

Deadstart 6603-1 driver 

Deadstart 6638 driver 

Deadstart 865 driver 

Deadstart 854 driver 

Deadstart 6603-n driver 

Preaddress 6603-11 program 

Deadstart system initiation program 

Deadstart main program (performs device labeling, 
permanent file processing, preloading, loading, and 
recovery) 

System monitor program (resides in PPO during system 
operation) 

Display control program (resides in PP9 during system 
operation) 

Entry point table copied into directory area of CMR as 
its first section. Each entry contains name of an entry 
point in a central processor program in system library, 
and a number which locates it in the program name table. 

Program name table copied into directory area of CMR 
as its second section. Each entry contains name of a 
PP program, CP program, CP overlay, or ERT, and 
its length, type, edition number, and residence. 

Programs and overlays; each has an entry in the pro- 
gram name table. As these records are read, the 
loader inserts disk addresses into corresponding pro- 
gram name table entries. 



5.1 

EDITLIB 
CALL CARDS 



EDITLIB is called into operation when an EDITLIB card appears in the control 
card record of a job. This card may assume one of two forms which affects 
only the initial processing (thereafter processing is identical for the two 
forms). 



EDITLIB. 

With this form, the current system directory is saved on a common file 
called SSSSSST. 
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EDIT LIB (RESTORE) 

With this form, the current system directory is replaced by the contents of 
the common file called SSSSSST. 



EDITLIB uses the following file names. These names should be unique, since 
it is impossible to protect these files under the current system; therefore, the 
user must NOT CREATE ANY FILES with the following names: 



SSSSSSS 
SSSSSST 
SSSSSSU 
SSSSSSV 
SSSSSSW 



SSSSSSX 
SSSSSSY 
SSSSSSZ 
SYSTEM 



5.2 

EDITLIB 
FUNCTION 
CARDS 



The EDITLIB program initially reads one record from file INPUT and copies 
it to a scratch file. This file contains the function cards to control the run 
initiated by the EDITLIB call card. The first card image read informs 
EDITLIB of an action to be performed. When the action is complete, the next 
card image is read, and the action it calls for is performed. When the record 
is exhausted, EDITLIB returns control to SCOPE. 



A function card begins with the name of the function, which may start in any 
column. Parameters may be separated by blanks or any characters other than 
period, dollar sign, right parenthesis , minus sign, or asterisk. A period or 
right parenthesis terminates the card, and the minus sign and asterisk have 
special meanings for the ADD function. In a word that begins with a letter, a 
dollar sign is treated as a letter; elsewhere, a dollar sign acts as a separator. 

ADD (A, B, CM) and ADDA+B,,,CM. have the same meaning. 

A function card requesting a condition that already exists is ignored. Errors 
in function cards result in a message. For some errors the function card is 
ignored, for others the job is terminated. 

The following notations are used in the descriptions of the function cards: 



Source file; name of a file from which data is to be read. 
SYSTEM is reserved for the current operating system. 



The name 



Destination file; the name of a file onto which data is to be written. 
The name SYSTEM is reserved for the current operating system. 



60189400 Rev. L 



5-2.1 



p Name of record to be processed. 

r Residence. The device from which a particular record is to be 

loaded when that record becomes part of SYSTEM. All records 
are written on disk (DS). In addition, some records may be kept 
in central memory (CM) for faster access. In the latter case, Ihe 
residence is central memory. 

e Edition. A number, 0-63, attached to a record by the ADD function. 



5.2.1 

SYSTEM 

MODIFICATION 

FUNCTIONS 



The following functions may be requested without a preliminary READY 
function. In this case, the running system, SYSTEM, will be modified. 



MOVE MOVE(p.r) 

The residence of a record is changed in the SYSTEM directory. If a record 
is moved into or out of central memory, the body of the record is added to or 
removed from the directory. Storage is moved accordingly. 



DELETE DELETE(p) 

Record p is to be deleted from the SYSTEM directory. If record p was 
resident in central memory, the body of the record is removed and storage is 
moved accordingly. The disk copy of the record is not affected. 



as 



DELETE (p x -p 2 ) 

This function deletes from SYSTEM directory records p x through p 2 , 
listed in the program name table. If p 2 does not appear after p ± in the pro- 
gram name table, the job is terminated with the message: 

((DEL)) EXHAUSTS PNT BEFORE SATISFACTION 

If any record (P!-p 2 ) is resident in central memory, the body of the record is 
removed and storage is moved accordingly. The disk copy of the record is 
not affected. 

Before any change is made to SYSTEM, a message appears on the B display | 
at the control point. 



EDITLIB WARNING - GO or DROP 

The operator must type n. GO to allow the MOVE or DELETE to proceed, 
the operator prefers not to risk the change , he can DROP the job , and 
SYSTEM will remain unaltered. 



If 
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LIST LIST (s) 

File s is rewound and searched until DSD is found, and the next two records 
are read on the assumption that they are the entry point table and program 
name table for the system which the file constitutes. The name of the file is 
written on OUTPUT, and the two tables are used to write, on OUTPUT, a list 
of the records in the file. For each record the following information is given: 

Name 

Description (PP PROG, CP PROG or OVERLAY) 

Residence (CM or DS) 

Edition number (2 decimal digits) 

Length (5 octal digits); length is in CM words, excludes the prefix of the 
record. 

If the record is a program with entry points, they are listed immediately 
below, indented. 



5.2.2 

LIBRARY REVISION 
FUNCTIONS 

READY 



In response to the READY function, EDITLIB prepares to create a system 
library on file d. A READY function is required for any modification more 
complex than deleting or changing residence of one or more programs from 
SYSTEM. 

READY (d) 

If d f SYSTEM, a model of an empty directory and an empty scratch file is 
prepared. Subsequent function cards cause information to be written into the 
directory and scratch file. 

READY (SYSTEM) 

The directory of the presently operating SYSTEM is to be manipulated. The 
current directory is copied within the field length of the EDITLIB program 
for subsequent modifications. 
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READY (SYSTEM, *) 

An empty directory is created. This form is used when SYSTEM is to be 
completely replaced from sources other than the currently operating 
SYSTEM. 

With the above forms, any records added are written into a common file 
called SSSSSSU. This file is not rewound between one dead start and the 
next. It is used as a scratch file of indefinite length. Directory entries 
for programs added since dead start will point to SSSSSSU. 



TRANSFER The records from CEA through DSD are not indexed in a system file directory. 
This function is used to add such records to a system file. 

TRANSFER (s,n) 

If n is a number, the next n records are copied from file s to the new file. If 
any records have a prefix, the run is aborted. 

If n is not a number, the prefix of the next record name on file s is verified 
against n; the prefix is discarded and the remainder of the record is copied 
to the new file. If the name in the prefix is different from n or if the record 
has no prefix, the run is terminated. 

TRANSFER (s) and TRANSFER (s,l) are equivalent statements. 

TRANSFER (s,n,2) 

In this form of the TRANSFER statement, n is a name. The next record on 
file s is checked for a prefix containing name n. The prefix is discarded and 
the rest of the record is copied to the new file. The file record is finished 
by adding, without checking prefix, all of the next record on file s. 
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ADD ADD (p.s.r.e) 

Record p from file s is added to the system library currently under con- 
struction. The record is assigned residence r. If r is absent, and file s is 
a system library, the residence p is taken from file s; otherwise, disk 
residence is assumed. The edition number attached to each record added 
is e, 0-63. If e is absent and s is a system library, the record is trans- 
ferred with its same edition number. If e is absent and s is not a system 
library, the edition number will be 0. Since r is never a number, and e 
is always a number, they cannot be confused, and any of the following is 
acceptable: 

ADD(p,s) ADD(p,s,e) ADD(p,s,r,e) 

ADD(p,s,r) ADD(p,s,e,r) 

If s ^ SYSTEM, s must be positioned at the beginning of record p; if file s 
is not properly positioned, a diagnostic is given and the function card 
skipped. If s = SYSTEM, pre-positioning is not necessary. 

In addition to a single record name, the p parameter may assume the 
following forms: 

p - p Records p 1 through p„ are added to the system library under 
construction. p„ must appear after p. in the file s. 

p - * All records on file s from record p to the end of the file 

are added to the system library under construction. 

* All records on file s from the present position to the end of 

the file are added. If s = SYSTEM, all records listed in the 
directory are added. 

The following two functions are needed only to add special records from a 
file other than a system library. 



ADDBCD ADDBCD (p,s,r,e) 

Parameters have the same meaning as for ADD; however, p is the name of 
a coded record. An overlay is created and written on the new system library. 
The first card of a coded record to be added to a system library must contain 
the name p, beginning in column 1. p must be the name of a single record; 
the formats p - p , p - *, and * are not allowed. 

X Li J- 
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ADDTEXT ADDTEXT (p , s , r , e) 

This is like ADDBCD except that file s is presumed to be a coded file for- 
matted as the COMPILE file output by EDITSYM. Even though there is a 
serial number after column 80 on each line, ADDTEXT discards everything 
after column 72 to save space in the overlay, p must be the name of a single 



record; formats p 



P 2 , P 



- *, and * are not allowed. 



ADDCOS ADDCOS (p, s, r, e) 

Parameters have the same meaning as for ADD; however, p is the name of 
a record without a prefix. ADDCOS is used to add the Chippewa Operating 
System RUN compiler and object routines to a SCOPE system library. 



DELETE DELETE (p) 

This function used after a READY function causes record p to be deleted 
from the new directory and system library under construction. 

DELETE ( Pl -p 2 ) 

This function deletes from the system library under construction, records 
p, through p 2 inclusive, as listed in the program name table of the model 
directory under construction. If p 2 does not appear after p x in this table, 
the job is terminated with the message: 

((DEL)) EXHAUSTS PNT BEFORE SATISFACTION 



LENGTH LENGTH (p) 

When p is a digit from 4 to 9, EDITLIB request a field length sufficient to 
accommodate a directory model of p times lOOOOg words. Before any func- 
tion cards are obeyed, EDITLIB must have obtained a field length for a 
directory model of at least 30000 g words. 

The directory models to be accommodated are those of the running system as 
EDITLIB finds it initially, plus any modifications EDITLIB may make between 
obeying a READY (SYSTEM) card and the succeeding COMPLETE card. 
Directory length = 2+2p+e+r. p = number of programs and overlays in 
library; e = number of entry points in CP programs in library; r = number of 
words in the bodies of all CM-resident programs. Normally no more than 
30000 g words are required; however, a larger field length can be established 
by using LENGTH (p) as the first function card read by EDITLIB. 
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COMPLETE 



COMPLETE 



This function causes the file id initialized by a READY function to be com- 
pleted. A COMPLETE function without a preceding READY is meaningless 
and the job will be terminated. 

If d = SYSTEM, the revised directory prepared since READY was executed 
replaces the current system directory. Before the replacement is made, a 
message appears at the control point on the B display. 

EDITLIB WARNING - GO or DROP 

The operator must type n.GO to permit replacement, or n.DROP to prevent 
it by terminating the job. 

If d f SYSTEM, the new directory and scratch file are written on file d. 



5.2.3 

POSITION FUNCTIONS A position function may appear anywhere within an EDITLIB deck. 

REWIND REWIND (s) 

File s is rewound. 



SKIPB 



SKIPB (s,n) 



17 



n logical records are backspaced on file s. n may be 1 to 2 -1. 



SKIPF 



SKIPF (s,n) 



,17 



If n is numeric (1 to 2 -1), n logical records on file s are skipped in a 
forward direction. If n is a name, the skip is forward to the end of logical 
record n. If the end-of-information is reached before n can be satisfied, 
the job is terminated. 
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EDITLIB EXAMPLES The running system includes program FORTRAN, a resident on disk only. 

• Bring into central memory residence, run a batch of compilations, and return 
the program FORTRAN to disk residence: 



job card 

EDITLIB. 

7/8/9 

MOVE (FORTRAN, CM) 

6/7/8/9 

job card 

6/7/8/9 

job card 

EDITLIB. 

7/8/9 

MOVE (FORTRAN, DS) 

6/7/8/9 



Control card begins an EDITLIB run. 

Function card read by EDITLIB. 
Ends EDITLIB run and job. 
Begins batch of compilations. 
Cards for the compilation jobs. 



Control card begins an EDITLIB run. 

Function card read by EDITLIB. 
Ends EDITLIB run and job. 



Construct a file called NEWSYS on tape, which duplicates the system now 
running: 



job card 

REQUEST, NEWSYS. 

EDITLIB. 

7/8/9 

REWIND(SYSTEM) 

READY(NEWSYS) 

TRANSFER (SYSTEM, 16) 

ADD (*, SYSTEM) 

COMPLETE. 

6/7/8/9 



Operator will assign a tape. 

Saves current directory and begin EDITLIB run. 



Prepares NEWSYS to receive records. 

Copies first 16 records of system. 

Copies to a scratch file all programs found in 
directory. 

Copies tables and scratch file to NEWSYS. 

Ends EDITLIB run and job. 
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Same as preceding example, except that the program in the present system 
called 2TS is to be replaced in NEWSYS by another program called 2TS, which 
is at hand as a deck of cards; 2TS is to have mass storage residence: 



job card 

REQUEST, NEWSYS. 
EDIT LIB. 
7/8/9 

REWIND(SYSTEM) 
READY(NEWSYS) 
TRANSFER (SYSTEM , 16) 
ADD(*, SYSTEM) 

DELETE (2TS) 

ADD(2TS,INPUT,DS) 

COMPLETE. 

7/8/9 

the new 2TS binary deck 

7/8/9 

6/7/8/9 



Operator will assign a tape. 

Saves current directory and begin EDITLIB run. 



Transfers 16 SYSTEM records. 

Copies all programs in the directory to a scratch 
file. 

Removes program called 2TS from new directory. 

Adds new 2TS from INPUT. 



Replace, temporarily, the program called 2TS; try it out by runs within the 
same job; and finally restore the original system: 



job card 

EDITLIB. 

Control cards for runs 
that will test new 2TS 

EDITLIB(RESTORE) 

7/8/9 

READY(SYSTEM) 

DELETE(2TS) 

ADD(2TS, INPUT, DS) 

COMPLETE. 

7/8/9 



Saves present directory and, therefore, system. 



Restores what was saved by EDITLIB. 



Function cards for EDITLIB. 
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New 2TS binary deck 

7/8/9 

Input cards for runs that 
will test new 2TS 

6/7/8/9 

Produce a new system file called MYTAPE which is a copy of the presently 
running system except that MTR is to be replaced: 

job card 

REQUEST MYTAPE. 

EDIT LIB. 

7/8/9 

REWIND(SYSTEM) 

READY(MYTAPE) 

TRANSFER(SYSTEM,14) Transfers first 14 records. 

TRANSFER(INPUT,MTR) Transfers new MTR to MYTAPE. 

SKIPF(SYSTEM.l) Skips over the old MTR. 

TRANSFER(SYSTEM,1) Transfers DSD to MYTAPE. 

ADD(*, SYSTEM) 

COMPLETE. 

7/8/9 

New MTR binary deck 

6/7/8/9 
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• 



Simulate the deadstart loading of a system tape called MAYBE, assuming its 
first 16 records to be the same as on file SYSTEM: 

job card 

REQUEST, MAYBE. 
EDITLIB. 

7/8/9 

SKIPFCMAYBE.IS) Skips over the 16 system records and the 2 

directory records. 

READY(SYSTEM,*) 

ADD(*, MAYBE) 
COMPLETE. 

6/7/8/9 



• Any succeeding jobs , provided they do not call EDITLIB , will use the system 
from MAYBE. Then the original system can be restored by: 

job card 
EDITLIB(RESTORE) 

6/7/8/9 
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UPDATE 



UPDATE is a maintenance program that creates, corrects, and manipulates 
program library files. UPDATE can be used with SCOPE 3.0 and newer 
versions for temporary testing or generating a new program library. A 
field length of 40000g should suffice for most UPDATE runs. 

UPDATE data may be source cards for a compiler or assembler run, data 
cards, or any other symbolic information convenient to the user. Columns 
73-80, however, are destroyed by UPDATE card identifiers. The UPDATE 
system call (control card) directs the program to the specific files and modi- 
fies the operation of the program. 



6.1 

PROGRAM LIBRARY 

INFORMATION 



The program library, which UPDATE creates and/or modifies, contains the 
symbolic data for programs being maintained on the system tape. These 
programs are arbitrarily divided into decks by insertion of *DECK and 
*COMDECK cards into the text stream. The program library file consists 
of a directory, a deck list, and text stream. 



The first word of the program library file is composed of two counters: 
the count of the identifiers and the count of the deck names. 



59 



Word 1 



35 



17 



00 



zero 


Count of 
identifiers 


Count of 
deck names 



Directory 

The directory lists all identifiers, left justified with zero fill, in the upper 
42 bits of succeeding words. The lower 18 bits of each entry contain 
miscellaneous data. 



Deck List 

The deck list contains the names of all decks in the file including those no 
longer current. The deck list entries have the same format as the directory 
entries . 



60189400 Rev. I 



6-1 



Text Stream 



The text stream contains card images and control information known as 
correction history bytes (CHB's) . At least one word of control information 
precedes each card image: 

17 00 



59 



53 



zeros 
(un- 
used) 



35 



CHB1 



CHB2 



Secondary CHB's recorded 
in bits 17-00 of the first 
word continue in subse- 
quent 18-bit bytes in the 
lower order 54-bits of 
each word and terminate 
with a zero-value CHB. 

Primary CHB; this byte identifies deck or 
correction set under which this card was 
introduced and gives the card its alphanumeric 
name. 

Number of words used by the compressed card image; this 
information speeds up input operations . 

Activity bit; contains a 1 if the text card, which immediately follows the 
control information, was active at the time the program library is written. 



CHB format: 



17 15 



00 



, i 



correction 
set name 



ZPT. 



identifies correction set which performed action; provides 
ordinal into identifier table . 

Activity bit; contains a 1 if the correction set activated this card. 
Not used. 
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Compressed Card 

The compressed card image begins in the word subsequent to that which 
contains the zero-value CHB. 00 characters represent consecutive blank 
columns. A two -character field of OOxx represents xx + 1 blank columns; 
the value 0000 represents end -of -card. The value of 55 is retained for one 
blank column. 



Card Identification 

A card identification assigned by UPDATE is permanent and cannot be 
changed. Since the validity of sequence numbers has not been ascertained 
for text information following any particular card image, if an irrecoverable 
parity error occurs, the UPDATE run will terminate. Card identifiers are 
in the format: 

beta.seqnum 

beta is the alphanumeric identifier; maximum of seven characters. 
It is defined on the *DECK and *COMDECK card for program library 
creation of on the *IDENT cards for correction runs. 

seqnum is the sequence number obtained by counting the cards with 
the same identification. 

The two elements of an identification are separated by a period. 

An identifier and sequence number are required. For example, SC12.42 is 
the 42nd card (sequence number) with the identifier SC12. The identifier is 
composed of a reference symbol (SC) combined with a reference number (12). 



6.2 

UPDATE 

PARAMETERS 



File parameters and special options on the UPDATE card may appear in any 
order. Each parameter must be specified by a string of characters of the 
form-. ident=value. ident may be any character string beginning with the 
letters P, N, I, L, C, or S; it cannot contain a comma, period, or paren- 
thesis. Value is a string of characters following an equal sign (blanks 
ignored) which specifies a file name and is subject to file name format rules. 



The idents P, I, L. 
or not they appear, 
specified. 



and C and their default file names are assumed whether 
The N and S files are generated only if the parameter is 



The meaning and default values of the file parameters and special options 
are indicated below. 
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Parameter (ident) 
P (OLD PL) 

N (NEW PL) 

I (INPUT) 

L (OUTPUT)t 
C (COMPILE) 



S (SOURCE) 



Option Values 

File containing old 
program 

File containing new 
program 

File containing control 
cards 

Listable output file 

File onto which card 
images to be assembled 
are written 



File on which a copy of 
source deck is written; 
contains a copy of cards 
necessary to regenerate 
existing library, minus 
inactive cards. 



Default Value 
OLDPL is assumed. 



If N is not specified, no new 
program library is written. 

INPUT is assumed. 



OUTPUT is assumed. 

COMPILE is assumed. 
(COMPILE output depends 
upon mode of updating. 
If C = 0, no compile file 
is written.) 

If S option is not specified, 
no source deck file is 
written. 



Special Options 
F 

Q 



R 



Write all decks on 
compile file 



Speeds updating process 
by specifying informa- 
tion on routines which 
will be updated 

Suppress automatic 
rewinding of P, N, S 
and C files 



If F option is not specified, 
only those decks modified 
are written. 

This option is effective 
only if correction runs 
are being performed. 



S , C , P , and N are rewound 
before and after processing. 



1" The L option does not list the card images of a program deck and their 
sequence identifiers in a creation run or when inserted via ADDFILE. To 
obtain such a listing, copy the COMPILE file onto OUTPUT. 
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6.3 

CONTROL AND 

DATA CARDS 



Control and data cards are punched on an 80 -column card through column 72; 
columns 73-80 are used by the Update Program for sequencing. The control 
word is signified by an asterisk in column one; the word begins in column 2 
and terminates with a blank or comma. Parameters may begin in any 
succeeding column with any number of intervening blanks; but no embedded 
blanks are permitted in the parameter string (except for the *LABEL card). 
All identifiers, both for decks and correction identifiers, are one to seven 
alphanumeric characters. All numeric fields contain decimal numbers. 



6.3.1 

MANIPULATING 
FILES 



When text and other control cards are to be read from files other than the 
main input file, file manipulation cards are used to direct update operations. 
They may appear at any point in an input record. Except for *LABEL, they 
may not appear on other than the main input file. File manipulation cards 
may not reference any of the files UPDATE is controlling. 



* REWIND This card causes the tape file, indicated by fname, to be rewound. 



^*REWIND fname 



fname 



Name of file from which information is to be read 



*SKIP The SKIP card causes the named file to be spaced forward the number of 

records specified in the numeric field, rent. If the record count is zero or 
absent, the file is spaced forward one logical record. 



f 



*SKIP fname, rent 



fname Name of file from which information is to be read 

rent Number of records to skip 
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*READ UPDATE reads input data from the named file until an end-of-record is 
encountered, at which point it returns to the main input file. Any cards, 
except *SKIP, +REWIND, *ADDFILE and *READ, may occur on the 
fname file. 



*READ fname 



fname Name of file from which information is to be read 



*LABEL This card is meaningful only in a creation operation. * LABEL precedes the 
first *DECK or *COMDECK card, and it specifies the 20-character label 
name to be given to the program library being created. The UPDATE pro- 
gram automatically updates the edition number and labels program libraries 
generated as a result of corrections. The label must be punched in 
columns 11-30. 



/*LABEL label name 



label name 20-character label name of the new program 
library 



6 3 2 

CREATING A NEW 
PROGRAM LIBRARY 



The following control cards are used to create a program library. 



*DECK This card indicates the beginning of a new deck; dname must be different 

from that of any previously introduced deck or correction identifier. A deck 
is terminated by the first occurrence of another *DECK, *COMDECK, or 
end-of-record. All intervening cards comprise text. They are identified 
with the deck name and numerically sequenced starting at 00001 for the 
*DECK card itself. File manipulation control cards may be embedded within 
the data cards, but they are not included in the numbering scheme. Cards 
introduced as a result of *READ, however, are included in the numbering 
scheme. Output control cards other than *DECK and *COMDECK may also 
be introduced and numbered. 
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/ *DECKdname 



dname Name of deck introduced; must differ from name 

of any previously introduced deck or correction set. 



*COMDECK This card introduces a common deck. *COMDECK is subject to the same 
rules as the *DECK card concerning naming and numbering; however, it 
is output in a different manner (section 6.3.4). 



*COMDECK dname 



dname Name of common deck introduced; must differ 

from name of any previously introduced deck or 
correction set. 



*END The *END card is provided for EDITSYM compatibility; it is ignored and 
suppressed. When the S option is selected, UPDATE regenerates *END 
cards . 



A 



END 



DECK GROUPING In the usual application, a *DECK or *COMDECK card would precede the 
definition of each deck or common deck in a system. However, more than 
one subprogram may be included in a deck, as indicated in the following 
example: 
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*DECK 



FIRST 




IDE NT 


FIRST 


END 




IDENT 


SECOND 



*END 
*COMDECK 



END 

FDATA 
BLOCK DATA 

COMMON/J3/A(10) 
DATA A/3*0., 7*1.0/ 
END 



*END 



Deck grouping is chiefly a function of the output section of UPDATE . 
Normally, two decks are grouped together if modification of one requires 
reassembly of both decks. Deletion of a *DECK card, however, also removes 
the deck division and groups two or more decks together. Similarly, insertion 
of a *DECK card in a later updating run will introduce a division. If, as in 
the above example, two subprograms are joined into one deck, all cards are 
identified by the first deck name regardless of later insertion of a *DECK 
card for the second deck. 

The following control cards may appear as input during an UPDATE creation 
run: 



*DECK 


*COMDECK 


*END 


* REWIND 


*SKIP 


*READ 


* LABEL 


*/ 


*WEOR 


*CALL 




*CWEOR 



All other UPDATE control cards produce a diagnostic. 
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6.3.3 

CORRECTING AND 

UPDATING The following control cards are used for correcting and updating a program 

library. 



*IDENT The *IDENT card introduces a correction set. All corrective operations 

except * PURGE and *ADDFILE must occur after *IDENT. All cards in the 
correction set are identified by idnam, which is subject to the rules for iden- 
tifiers. This identifier must not be the same as any identifier currently in 
effect, such as original deck names or any later identifier names. Presum- 
ably, the identifier would be a correction set number, such as SC12, or some 
other unique name. This identifier holds until the next *IDENT or * PURGE 
card. 



(' 



*IDENT idnam 



idnam Name of correction set; must differ from the name of 
any previously introduced correction set or deck. 



* PURGE The *PURGE card may appear in the place of an *IDENT card. Any reference 
to the correction set idnam is completely purged by changing the name to 

which allows it to be reintroduced in a later correction set. When 

two identifiers are separated by period, these identifiers are purged as well 
as all identifiers that occur between them on the identifier list. 

All cards introduced under the specified identification are physically removed 
from the new program library; all corrections to the named set are removed 
by squeezing out correction history bytes of that identification. Since perma- 
nent sequencing information is affected, the * PURGE card must be used with 
care. 



| * PURGE idnam ^ , idnam 2 idnam n 

/♦PURGE idnam -L.idnamg 



idnanii Name of correction set to be purged (must be a known 
identifier) 

*PURGE simulates the effect of *YANK (described later); although the results 
of *PURGE cannot be undone, the results of *YANK can be altered. *PURGE 
can be used to remove completely a deck of cards and their idname. Assume 
that routine CIO is initially introduced with the deck name CIO. All cards of 
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CIO (and only those cards) have identifier CIO. To remove CIO completely 
from the deck , two modifications are required: 



*IDENT 
* DELETE 
* PTJRGE 



xxxxxx 

CIO. 1, CIO. 978 

CIO 



(978 cards are assumed) 



The first statement deactivates all inserts made to CIO and the second 
removes all CIO cards. An alternate form of the *PURGE statement is used 
to purge all correction sets introduced on or after the introduction of one 
identified by idnam. 



r 



* PURGE idnam, " 



Since all modifications introduced are recorded in the library, this form is 
order dependent and may be used to return a program library to an earlier 
level. Purged items cannot be restored, however. Care must be taken if an 
idnam,* , has been introduced. If * is to be purged, it must be the first name 
on a PURGE card or UPDATE will assume that the * refers to an alternate 
form. 

Example 1 : 

A program library LIB has been periodically modified for a 
number of months; at some point in time, it becomes desirable to step 
back permanently to a previous level of LIB. The following deck se- 
quence illustrates this use of UPDATE : 



L 



* PURGE JUNMOD1,* 




where all modifica- 
tions made after May 
follow JUNMOD1 
in the identifier list 



'UPDATE (N=LIBMAY, P=LIBAUG, C=0) 



rL 



REQUEST, LEBMAY. 



/JOB. 



/REQUEST, LIBAUG. 



■ The program library 
modified only through 
May, to be created 

Most recent version of 
the program library 
LIB 
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Example 2: 



Assume that a specific deck, BAD, on program library LIB, is no 
longer of any use and is to be removed permanently from the program 
library, The following deck sequence illustrates such permanent 
removal: 



7(end-of-file) 

o 

9 



'* PURGE BAD 



1 



I 



'*DELETE BAD. 1, BAD. 33 



*IDENT DELBAD 



8 (end-of -record) 

9 



'UPDATE (P=LIB > N'=LESSBAD, C=0) 



/ REQUEST, LESSBAD. 



REQUEST, LIB. 



fJOB. 



-Purges all cards with 
identifier BAD 
^•Deactivates all cards 
between BAD. 1 and 
last card of deck 



^Program library, with 
BAD purged, to be 
created by this run 

Most recent program 
library 
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* DELETE Cards may be deactivated with the *DELETE card. The first form of the 
statement specifies one card; the second, an inclusive range of cards. 
This range may include cards already deleted which are deleted again by 
appending a correction history byte. In the second form, the b.m card 
must occur after the a.n card; in both forms all specifically referenced 
cards must exist. Text cards may be inserted after the last card deleted. 






♦DELETE a.n 



♦DELETE a.n, b.m 



a,b 



n,m 



Alphanumeric identifier (a deck, common deck 
or correction set name) 

Decimal numbers corresponding to card 
sequence numbers 



* RESTORE Specified cards are reactivated with the *RESTORE card. The first form of 
the statement specifies one card; the second an inclusive range of cards. 
Cards are restored by appending a correction history byte. Text cards may 
be inserted after the last card restored. 



♦RESTORE a.n 



♦RESTORE a.n, b.m 



a,b 



n,m 



Alphanumeric identifier (a deck, common deck 
or correction set name) 

Decimal numbers corresponding to card 
sequence numbers 



*!NSERT Cards may be inserted with the *INSERT card, a.n specifies the card after 
which the insertion is to be made. 



♦INSERT a.n 



Alphanumeric identifier (a deck, common deck 
or correction set name) 

Decimal number corresponding to card sequence 
numbers 
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* YANK All effect of correction sets may be removed with the * YANK card. The 
correction sets must exist at the time the *YANK card is encountered. 
'"YANK restores the library to a form it had before the correction set 
occurred. The effect of any *YANK card included in the correction set is 
nullified. Two names separated by a period indicate an inclusive list of cor- 
rection sets to be removed. Insertions may not follow the *YANK card. 



I 



| / *YANKa,b,c,d 

r 



*YANKa.b 
a,b,c,d 



Alphanumeric correction set names 



Example: 



To reverse the effect of a correction set but not permanently remove 
the correction set from the program library LIB: 

1. This change may be made temporarily for testing purposes: 



Nullifies effect of 
correction set GOTTOGO 




*YANK GOTTOGO 
/*IDENT NEGATE 



L 



COMPASS(I=COMPILE) 



/ UPDATE (P=LIB) 
/REQUEST, LIB. ~ 



/JOB. 
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2. To put this change onto a new program library: 



JL 



I 



*YANK GOTTOGO 



IDENT NEGATE 



/C0MPASS(I=C0MPILE) 
/UPDATE (P=LIB, N=NEWLIB) 



/JOB. 



/REQUEST, NEWLIB 
/REQUEST, LIB] 



*/ (slash) A correction set may include comment cards; they have an asterisk in col- 
umn 1, a slash in column 2, and a comma or blank in column 3. This card 
is ignored by UPDATE; it is simply copied onto the report. A comment card 
may appear anywhere within the input deck or on a remote file; except within 
an ADDFILE. 



r 



*/Aany comments 



*ADDFILE When *ADDFILE is encountered, UPDATE rewinds the named file fname, 

reads creation control cards and text card data, and inserts this information 
after the a.n card on the old program library. The first card on fname must 
be *DECK or *COMDECK. UPDATE reads from this file until an end-of- 
record, which returns UPDATE to the main file. The *ADDFILE card must 
not be used when the UPDATE (Q) option is being used. Comment cards in 
this file are treated as text cards. 
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*ADDFILE fname.a.n 



fname Name of file from which information is to be read 

a Alphanumeric identifier (deck, common deck or 

correction set name) 

n Decimal number corresponding to card 

sequence number 



6.3.4 

DIRECTING THE 
OUTPUT 



Output control cards are used to organize and order information output to 
the COMPILE file. *DECK and *COMDECK cards have additional functions 
during program library creation; these control cards are included in the 
program library. 



*DECK DECK delimits a deck for compile output. This division is meaningful 

during a correction run when the selective assembly feature is employed. 
Under the selective assembly mode of operation, the only decks included on the 
assembly files are those in which one or more cards have been changed. 
In selecting the cards to be assembled, the UPDATE program compares 
card activities in the current run with those which existed when the program 
library was created. If any common deck called within a deck has been 
changed, that deck is considered to be changed. 



*DECK dname 



dname 



Deck name 



*COMDECK This card introduces a common deck. Common decks are not written onto 
the COMPILE file; they are saved by UPDATE and introduced into the 
COMPILE file as a result of *CALL statement. The common deck must 
precede the call . 



*COMDECK dname 



dname 



Deck name 
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* WEOR The WEOR card is used to organize the COMPILE file for ease of input to 
compilers, assemblers, etc. It writes an end-of -record of level n on the 
COMPILE file. K n is 15 or greater, a level 15 10 end-of-record is written 
but not an end -file tape mark; level is assumed if not specified. The 
*WEOR card does not appear on the COMPILE file. *WEOR may be inserted 
into a deck on the program library; it is effective only when that deck is 
written onto the COMPILE file. 



*WEOR n 



Decimal number corresponding to SCOPE 
end-record level numbers (a number ^ 15 
writes level 15 10 end-record but not an 
end-file tape mark) . Level is assumed 
if not specified. 



*CWEOR CWEOR is a conditional WEOR. If information has been written on the 

COMPILE file when tlie CWEOR card is encountered, it acts as a WEOR card. 
However, if the COMPILE file has not been written on during the run, the 
CWEOR card is ignored and processing continues with the next card. 



*CWEORn 



Same as for WEOR 



Example : 

To create a program library (PL) consisting of a COMPASS deck and a 
FORTRAN deck and to generate a COMPILE file that would permit these decks 
to be processed by the assembler and compiler, the following deck structure 
is required: 
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Creation Job 



fr, 



'(l 



FORTRAN source deck 



/*WEOR 



DECK FORT 



I 



COMPASS source deck 



X- 



/ 



*DECK COMP 



/RUN(S, , , COMPILE) 



-/COMPASS(I=COMPILE) 



/UPDATE (N=PL) 
/REQUEST, PL. 



'JOB. 



Generated COMPILE File 



COMPASS deck Picked up and assembled by COMPASS 



Terminates the COMPASS scan 



FORTRAN deck Picked up by the FORTRAN compiler 



Terminates the FORTRAN scan 
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•CALL This card is used to insert the text of a previously encountered common 
deck, dname, into the COMPILE file. Common code, such as system 
symbol definitions, may be declared in the common deck and used in sub- 
sequent decks (or assemblies) without repeating the data cards. The *CALL 
card does not appear on the COMPILE file. The contents of the common 
deck, excluding the *COMDECK card, follow immediately. The *CALL card 
cannot occur within a common deck. 



*CALL dname 



dname Name of common deck name 



6.3.5 

SELECTIVE 

ASSEMBLY The selective assembly feature is handled by the control cards described 

below. This feature is used in determining information to be written on 
the COMPILE file. Normally, only modified decks are written onto the 
COMPILE file. To control this process at the deck level, COMPILE cards 
are introduced . 



* COMPILE The * COMPILE card specifies decks to be assembled. With the first form 
shown below specific decks are mentioned. In the second form, a range of 
decks is specified. Decks written on the COMPILE file include the two 
specified as well as all decks listed between them in the list of deck names 
produced by UPDATE. All decks affected by these statements are written 
on the COMPILE file regardless of the existence of any modifications within 
them. 



r 



*COMPILE a,b,c,...,d 



^COMPILE a.d 



a,b,c,d Deck names 



If the full assembly (F) feature is selected on the UPDATE call card, the 
* COMPILE cards are ignored. 
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6.3.6 

SPEED UPDATING 



For speed updating, the Q option must be specified on the UPDATE call 
card. It is effective only if corrections are being performed. If the Q 
option is used incorrectly, the UPDATE operations result in job termination. 

The following modifications of the updating operation take effect under this 
option: 

1. Only routines named within ^COMPILE statements are written onto 
the COMPILE file. The names specified in the *COMPILE state- 
ments must include all routines to be modified. 

2. When corrections are made to common decks, UPDATE does not 
automatically include on the COMPILE file the decks which call 
the common deck. Propagation of these modifications is left to 
the user; he must specify each such deck on the *COMPILE card. 

3. If corrections are specified to routines not included in the *COMPILE 
statements, UPDATE will print unprocessed corrections. 



4. Selective assembly has no effect. 

5. A new program library cannot be produced; if so specified, it is 
ignored. 

6. If a source file is requested (S), all the common decks as well as 
decks specified only on the *COMPILE cards will be produced. 



6.4 

L1STABLE OUTPUT 

FROM UPDATE 



Creation of a new program library produces a list file containing a copy of 
all file manipulation and creation cards and a list of deck names and correction 
set names known at the end of the UPDATE run, as well as error diagnostic 
messages. 



During a correction pass, the listings are more detailed. The first listing 
is a printout of the correction sets as encountered. Each *IDENT (or * PURGE) 
appears on a titled page. A printout of each card on the input file follows. All 
cards input by the *READ command are included and identified on the right by 
the file from which they were read. 

The second set of listings, a continuous commentary of all effective changes 
introduced to the file, includes all purged cards as well as cards for which 
the activity status changed since they were placed on the program library . 
Cards inserted by the * ADD FILE statement are not listed. 
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6.5 

OVERLAPPING 

CORRECTIONS 



Diagnostic messages are listed as they occur. Whether or not the updating 
process is successfully accomplished, an appropriate dayfile message appears. 

When a COMPILE file is written, the locations of all *WEOR and *CALL cards 
are listed. If L = on tiie UPDATE card, all listable output from UPDATE is 
suppressed. If L = 1, the deck name list, identifier list, and continuous com- 
mentary are suppressed. 



A correction set can be remodified by a later correction set. Corrections 
which modify a card more than once in one correction set are marked in the 
output listing by the word OVERLAP. Modifications for each correction set 
are performed by UPDATE in the order in which sets are introduced. The 
order of specification is irrelevant if no correction is dependent on another. 
If a dependent relationship exists, however, the order is of paramount 
importance. 

For example, if a numbered insertion in a correction set is subsequently 
deleted, the insertion card is present but inactive. When the deletion 
occurs first, however, by specifying a range of cards and then indicating 
the point at which insertion is to be made, the numbered insertion can be 
made active. 

An *INSERT statement can be used to verify that an earlier correction is 
present on the file. In such a case, the insertion will be empty; if the card 
following *INSEBT is another UPDATE control card, no insertion will be 
made. 

*IDENT MODSUB1 

*/ATHE CHANGES MADE BY THIS CORRECTION SET 

*/ADEPEND ON THE IMPLEMENTATION OF THE 

*/ACORRECTION SET - MOD - IF THIS SET OF 

* /A CORRECTIONS HAS NOT BEEN ADDED TO THE 

VAPROGRAM LIBRARY ABORT THIS CORRECTION 

*/ASET 

*INSERT MOD. 1 

*INSERT A.n 

Correction subset (MODSUB1) depends on the initial correction set 
(MOD) having been previously inserted in the sequence. 
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6.6 

UPDATE EDITLIB 

INTERFACE 



Unlike EDITSYM, UPDATE does not produce a COMPILE file with routines in 
the order in which modifications were made to them; rather, the order of 
routines on the COMPILE file is determined by their position on the OLDPL. 



Input cards to EDITLIB (such as ADD cards) should be ordered according to 
routines' positions on the OLDPL, not in the order of mention in the UPDATE 
modification cards. 



6.7 

FILES PROCESSED 

BY UPDATE 



With the control card identifiers indicated below in the second column, the 
user may process several UPDATE files; some may be assigned to tape units. 



File 



Input 



Identifier 



Function 

Provides 

control 

information 



Urn 



Position after 
Update Call 



Coded Left at end of record ter- 
minating update control 
cards; other cards may 
follow. Position after 
abort unpredictable. 



Output 



Produces Coded At current position of file, 

listings If L 4 OUTPUT, fname not 

rewound . 



Compile 



Produces Coded Rewound before and after 
images for UPDATE operation unless 

assembly or rewind suppressed by R 

compilation option. 



Old PL 



New PL 



N 



Contains old 
PL 

Contains new 
PL 



Binary 



f Rewound before and after 
I UPDATE; no rewind if R 
Binary/ option specified. 



Source 



Contains copy 
of cards to 
regenerate 
existing libra- 
ry, inactive 
cards omitted. 



Coded Same as P and N 



NOTE: Since the validity of sequence numbers has not been ascertained for 
text information following any particular card image , if an irrecoverable 
parity error occurs, the UPDATE run will terminate. 
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The following files are used by UPDATE in processing: 

File Name Functions Comments 



CMPSCR Scratch file. During library 

creation, it holds entire 
symbolic source. During 
correction runs, it holds 
programs as they are up- 
dated. CMPSCR is used 
also to copy decks to be 
written to COMPILE file. 
(To avoid disk conflicts, 
tape assignment is often 
desirable if large volume 
files are involved. ) 

COMDKS Used internally by UPDATE 

FT EXT Used internally by UPDATE 



Binary file. Rewound prior to 
and after updating. Not used 
if full assembly mode is 
selected although it is addressed 
by UPDATE. 



Must be mass storage files. 
Files are evicted before and 
after the updating operation. 



Files mentioned in ADD FILE, READ, REWIND and SKIP operations are 
left as defined by the latest directive encountered on the input stream. 
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6.8 

UPDATE CARD 

DECK EXAMPLES 



1. To set up an UPDATE program library containing two normal decks 
and two common decks: 



n 



' (end-of-file) 



'*CALL D2 



*CALL Dl 



'*DECK name 



0. 











*DECK name 



1/ 



*COMDECK D2 



I 



*COMDECK Dl 





A 

8 (end-of -record) 
9 




/UPDATE(N) 






/REQUEST, NEWPL. 










/job. 
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2. To modify a program library and produce an assembly listing: 



dname appears on a *COMPILE 
card since dname not referenced 
by preceding corrections. 



A 



Corrections 



/" 7 
' 8 

9 



I 



I 



L 



J_ 



♦COMPILE dname 



*DELETE 



*INSEET 



*IDENT 



I 



/COMPASS(I=COMPILE) 



UPDATE(P=fn) 



/JOB. 



/REQUEST.fn 



fn specifies 
program 
library created 
in a prior run. 
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3. Run to generate a new program library with corrections: 



Corrections 






/ 



7 



1 



*DELETE 



*INSERT 



*IDENT 



/UPDATE (P=fnl, N^fn2) 
-VREQUEST,fn2. 
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4. Example of Q-option use. UPDATE temporarily places the data from 
decks on file COMPILE (may be otherwise specified) and terminates. 
COMPASS picks up data from COMPILE file and assembles it. 



<\ 



Must name all decks 
modified by the 
corrections 

Corrections 



/ a 



/ 




♦COMPILE 



♦DELETE 



INSERT 



*IDENT 



I 



L 



I 



COMPASS (I=COMPILE) 



UPDATE (Q,P=fnl) 



REQUEST, fnl 



/job: 
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To construct a new program library from the old program and add a 
new routine, a new common deck, and a new SYSTEXT deck by calling 
UPDATE. 



4" 



n 

8 
9 



Text cards for routine FFF 



New routine FFF 



'*DECK,FFF 



Text cards for deck DDD 

Name card required for 

EDITLIB text cards for 
system text 

Add DDD after deck 
EEE, card nnn 
DDD is new 



*INSERT,GGG.nnn 



'*IDENT, FFF 
./ 



DDD 



/*WEOR 
/*DECK,DDD 



*INSERT,EEE.nnn 



f*l DENT, DDD 



system text 



Jl 



/*COMDECK, AAA 
/*INSERT,BBB.nnn 



/*IDENT,AAA 



/UPDATE(N,C=0) 



/REQUEST, NEWPL. 



/REQUEST, OLDPL 



/JOB. 



-Text cards for common 
deck AAA 

. Add AAA after deck 
BBB , card nnn 

COMDECK AAA is to 
be added 
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To insert a common deck (COMDK1) at the beginning of a new program 
library. The common deck must be at the beginning of the new program 
library since the first deck (ELRENO) on the old library will call for 
the common deck to be inserted, and common decks must precede the 
*CALL for the deck. 



/*CALL,COMDKl 



'*INSERT, ELRENO. 10 



(Card still has identifier 
ELRENO. 10) 

(New deck name for ____ 

ELRENO) /*D ECK,NELRENO 

(Contents of 
COMDK1) 



>'*COMDECK, COMDK1 



L 



*DELETE, ELRENO. 1 



/*IDENT,ADDCD1 



L 




.(delete *DECK, 
-£T ELRENO card) 



UPDATE (N,C=0) 



REQUEST, NEWPL, MT. 



—£_ 

/REQUE ST , OLD1 'L , MT . 
/JOB. 
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7 . Simplified example for generating a program library by calling 
UPDATE: 

Contents of file Al: 

*DECK,SET1 

PROGRAM ZIP 
C A DO-NOTHING JOB 

END 
*DECK,SET2 

SUBROUTINE JIM 

A = B - SIN(C) 

END 
*COMDECK,CSET 

COMMON A, B,C 
6/7/8/9 



For the UPDATE task: 



9 /UPDATE (I=A1,N) 



L 



REQUEST, NEWPL. 



'REQUEST, Al 



/JOB. 



The contents of file COMPILE will contain: 
decks SET1 SET 2 



ich contain: 






PROGRAM ZIP 


SET1 


00002 


C A DO-NOTHING JOB 


SET1 


00003 


END 


SET1 


00004 


SUBROUTINE JIM 


SET2 


00002 


A ■=■ B - SIN(C) 


SET2 


00003 


END 


SET2 


00004 
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To alter the program : 



1 



*CALL,CSET 



FORTRAN statements 



I 



'♦INSERT, SET2. 2 
CALL JIM 
C=3.1419 
B=1.0 



*CALL, CSET 






/*DELETE,SET1.3 
/*IDENT,ADD1 



/UPDATE. 
./REQUEST, OLDPL. 




-OLDPL = 
tape generated 
by previous run. 



Results in decks SET1 and SET2 on the COMPILE file; contents are: 



PROGRAM ZIP 




SET1 


00002 


COMMON A 


B, 


C 


CSET 


00002 


B=1.0 






ADD1 


00002 


C=3.1419 






ADD1 


00003 


CALL JIM 






ADD1 


00004 


END 






SET1 


00004 


SUBROUTINE JIM 


SET2 


00002 


COMMON A 


B, 


C 


CSET 


00002 


A = B - SIN(C) 




SET 2 


00003 


END 






SET2 


00004 
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6.9 

UPDATE MESSAGES Listing Messages 



***ABOVE CARD ILLEGAL DURING CREATION RUN 

***ADDFILE FIRST CARD MUST BE *DECK OR *COMDECK BUT WAS: 

***ADDFILE INVALID FROM *READ FILE 

***ADDFILE INVALID WITH Q-OPTION 

***CARD LENGTH ERROR ON OLD PROGRAM LIBRARY 

***CARD NUM ZERO OR INVALID CHAR IN NUM FIELD 

*** CONTROL CARD INVALID OR MISSING 

***DECK NAMES SEPARATED BY PERIOD IN WRONG ORDER 

***DUPLICATE DECK NAME 

***DUPLICATE IDENT NAME 

***ERROR DECK DOES NOT EXIST 

*** ERRORS IN INPUT: NEWPL, COMPILE, SOURCE SUPPRESSED 

***FILE NAME LONGER THAN 7 CHARACTERS 

***IDENT UNKNOWN 

***IDENTIFIER LONGER THAN 7 CHARACTERS 

***IDENTIFIERS SEPARATED BY PERIOD IN WRONG ORDER 

***INVALID NUMERIC FIELD 

***NO DECK NAME 

***NO SUCH COMMON DECK 

***NOT ALL MODS WERE PROCESSED 

***NULL ADDFILE 

***ON THE ABOVE CARD THE FIRST LIMIT EXCEEDS TERMINAL 
LIMIT 

***OR A REFERENCE IS MADE TO DECK NOT MENTIONED ON 

COMPILE CARD (This line appears only if the Q option is in effect) 

***PREMATURE END OF RECORD ON OLD PROGRAM LIBRARY 

***RESERVED FILE NAME 

*** THESE MAY BE MODS TO DECKS NOT MENTIONED ON COMPILE 
CARD OR AN INCOMPLETE ADDFILE 

***UNKNOWN IDENTIFIER 
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Display and Dayflle Messages 

CORE OVERFLOW 

DECK STRUCTURE CHANGED 

FILE NAME ON UPDATE CARD GR 7 CHAR, UPDATE ABORTED 

IMPROPER UPDATE PARAMETER, UPDATE ABORTED 

ONE OR MORE OVERLAPPING CORRECTIONS 

SKIPPING (appears during Q-mode skip; does not appear in Dayfile) 

UPDATING deckname (does not appear in Dayfile) 

UPDATE ERRORS, JOB ABORTED 

UPDATING FINISHED 

ERRORS IN UPDATE INPUT 
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EDITSYM 



The EDITSYM program enables the user to organize symbolic information 
into program libraries and to make symbolic corrections or alterations to 
existing program libraries. Data in a program library may be source 
cards for a compiler or assembler run, data cards, line images for a 
document, or any other symbolic information desired. Once the symbolic 
material has been put into the program library format, EDITSYM provides 
a two-level editing capability. 

Primary edit operations result in permanent alterations to the program 
library; secondary edit operations allow the user to keep track of changes. 
All primary level editing operations result in physical rearrangement of 
the program library and resequencing of the primary sequence numbers. 
Secondary level operations do not result in resequencing; they do not alter 
the arrangement of cards with primary sequence numbers. Primary and 
secondary levels are associated with two sets of decimal sequence numbers. 
Primary sequence numbers are decimal integers 1-n. Secondary sequence 
numbers are decimal numbers in the form j. k where j is the primary se- 
quence number of the preceding card and k is a secondary sequence number. 

For example, in a program library containing a deck of cards numbered 
one to five, a primary level edit operation would be used to delete card 
three. The new file would not contain card three, and the sequence numbers 
would be changed to one through four. If, however, a secondary level edit 
is performed to delete card three, the card image would still exist on the 
new file but it would be marked as cancelled. Similarly, new cards added 
in a primary edit would be inserted where requested and given appropriate 
primary sequence numbers. If new cards were added in a secondary edit, 
for instance, after card three, they would be assigned the numbers, 3. 1, 3.2, 
3.3, etc. , and the primary numbers would remain as they were. 



7.1 

PROGRAM 
LIBRARY 
FORMAT 



A program library may consist of two sections: common and text, but it 
need not contain both. Each section may contain one or more logical records. 
In both sections the first two words of a logical record, the prefix, contain 
deck name identification information. The format of the prefix is as follows: 
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Word 1 



59 


53 


47 




35 




11 







"8 





1 





N 



N 2-digit display code number 
= 02 common section 
= 03 text sections 



99 



Word 2 of common and text sections 



59 



17 



11 



deck name 


00 


edition number 



The deck name may not exceed seven characters. The edition number is a 
display coded integer which is increased by one each time a new program 
library is requested. 



7.1.1 

COMMON 



DECKS The first section of a program library contains the common decks. Each 

common deck consists of one logical record with a two-word prefix. The 
remainder of the record contains the packed images of the deck. The last 
card image is *END. If there are no common decks, there is no common 
section . 



7.1.2 

TEXT DECKS 



The second section of a program library contains an arbitrary number of text 
decks. Each consists of one logical record identical in format to a common 
section record, except that in the first prefix word N is equal to or greater 
than 3. 
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7.1.3 

COMPRESSED 

DECK FORM Both common and text decks exist in the program library in compressed form 

with blank characters removed. Blanks are replaced by the character 55 
followed by a 6-bit count. Thus, the character pair 5500 represents one 
blank, 5501 represents two blanks, etc. If more than 64 blanks are to be 
represented, two character pairs are needed. 55775502 as a consecutive 
character string represents 67 blanks. The end of a card is recorded by a 
00 character followed by a 00, 01, or 02 depending upon the editing status 
of the card. 

00 indicates card to be used . 

01 indicates card logically deleted by secondary editing. 

02 indicates card added by secondary editing. 



7.2 

COMPILE OUTPUT The main function of EDITSYM is to produce , from selected portions of a 
program library, a file of information in a format that can be processed by 
FORTRAN, COMPASS, or other processor. When a compile file is re- 
quested, the procedure is as follows: 



Card marked as cancelled by secondary editing is 
not written on the compile file. 

EDITSYM control cards are not written on the compile 
file, with one exception. Control card *CALL,dn, when 
encountered within the text of a deck on the program 
library, is retained as a comment card. The common 
deck named dn is found and written immediately after 
the *CALL card. 

Text decks are written into the compile file as a single 
logical record until or unless a *WEOR card appears in 
the EDITSYM control card deck. Cards are represented 
by 90 display code characters, terminated by a zero byte 
(end-of-line) , as follows: 

Columns 



1-72 Supplied on the source 

73-79 Deck name 

80-84 Primary sequence number 

85 Period for a secondary text card 

86-90 Secondary sequence number 
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7.3 

CONTROL CARDS 



7.3.1 

EDITSYM 
CALL CARD 



The call for EDITSYM is as follows: 



EDITSYM(I=input file, C=compile file , L=list file, 

OPL=old program library, NPL=new program library) 

Parameters may appear in any order. 



Input 



absent 
I 

INPUT 
I=lfn 
INPUT =lfn 



corrections on INPUT 
corrections on INPUT 
corrections on INPUT 
corrections on lfn 
corrections on lfn 



Compile 



absent no compile output 

C compile output on COMPILE 

COMPILE compile output on COMPILE 

C=0 no compile output 

COMPILE = no compile output 

C=lfn compile output on lfn 

COMPILE =lfn compile output on lfn 



List 



absent 

L 

LIST=L 

LIST 

L=0 

LIST=0 

L=lfn 

LIST=lfn 



no list 

list on OUTPUT 
list on OUTPUT 
list on OUTPUT 
no list 
no list 
list on lfn 
list on lfn 



Old Program Library 



New Program Library 



absent no old program library 

OPL=0 no old program library 

OPL old program library on OPL 

OPL=lfn old program library on lfn 

absent no new program library 

NPL=0 no new program library 

NPL new program library on NPL 

NPL=lfn new program library on lfn 

(NPL is unlabeled, if written on tape). 
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The following cards control the addition and deletion of entire decks and local 
corrections within decks. All control cards referencing common decks must 
precede any control cards referencing text decks. This is necessary because 
all of common must exist in its final form before any text processing is done 
to insure correct processing of common references within text decks. 



7.3.2 

NEW DECKS 



New decks may be introduced by placing 
*COMDECK,dn 



or 

*DECK,dn,n 
in front of the deck, and 

*END 

at the end of the deck. 

The deck name to appear in the prefix is dn. All cards introduced in this way 
are considered primary cards and are given a 00 editing status terminator. 

*COMDECK card specifies the introduction of a common deck. 

If common decks are to be introduced, *COMDECK cards must precede any 
control cards which introduce or reference text decks. 

*DECK identifies the subsequent cards as a deck belonging to the text 
section of the new program library. 

The n parameter specifies the value of N to be used in the prefix, n may 
be 3 to 99; the value 3 is assumed if n is absent. Values 4-99 may be used 
as special flags for other routines which process program libraries. 



7.3.3 

DECK SEQUENCE 
CONTROL 



*COPY,dn ,dn 

When this card is encountered, EDITSYM copies the entire text decks from 
the old program library to the new one and/or to the compile file . Copying 
begins at deckname dn^ and continues up to and including the deck name dn . 
If dn is absent, only dn is copied. If dn is * copying begins at the 



60189400 Rev. C 



7-5 



present position and continues through dn 2 . If dn 2 is * copying begins at dn^ 
and continues through the end of the program library. 

*WEOR 

The WEOR card causes EDITSYM to terminate the logical record being 
written on the compile file . 

*CATALOG,lfn 

Common and text deck names from the program library, lfn, are listed on 
OUTPUT. 

^COMPILE, lfn 

A compile file will be written on lfn. A *COMPILE card overrides the 
compile parameter on the EDITSYM call card; the *COMPILE card applies 
only to the deck specified on the following *EDIT, *DECK, or *COPY card. 
Once a *COMPILE card has been encountered, compile files for any re- 
maining text decks must be requested by a *COMPILE card. 



7.3.4 

EDIT CONTROL The user can make corrections to a program library deck with edit control 

I cards. The editing process does not depend upon a *COPY function. Primary 

and secondary numbers specify cards in the deck to be altered or after which 
new cards are to be entered. Sequence numbers are not contiguous from one 
program library deck to another; therefore, the name of the deck must also 
be specified. 

*EDIT,dn 

dn is the name of the deck to be edited. This card must terminate the set 
of edit control cards which modify the deck dn. 

Primary Level Edit C ontrol 

*INSERT,n 

Corrections are inserted following card n. The corrections terminate 
with the EDIT control card. All text introduced is considered primary text 
and thus will cause resequencing if a new program library is requested, 
n must be an integer. 
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*DELETE,m,n 

Cards m through n, inclusive, are deleted. If n is omitted, only card m is 
deleted. Source cards may follow the *DELETE control card and are in- 
serted following the last deleted card. The cards deleted are removed from 
the new program library. Any cards inserted are primary corrections, 
n and m must be integers. 

*RESTORE,m,n 

This card restores to its original state a portion (m through n inclusive) of 
a deck altered by secondary editing. All primary text cards cancelled as 
a result of a secondary editing operation (all cards with a 01 editing status 
terminator) , are restored as normal primary text cards. All added 
secondary text cards appearing within this range are removed. 



Secondary Level Edit Control 

♦CANCEL, m,n 

Either m or n may be of form j . k where j is a primary number, and k is 
a secondary sequence number. This card will cause cancellation of all 
cards from m to n inclusive. Primary cards are not removed; they are 
marked as cancelled; however, secondary cards are removed. Source 
cards may follow the *CANCEL control card and are inserted following the 
last cancelled card. The insertions are marked as secondary text. Cancel- 
lation does not cause resequencing of the primary cards when a new program 
library is requested. 

*ADD,n 

n may be of the form j.k as defined above. The ensuing cards are inserted 
as secondary text. Addition does not resequence primary cards when a 
new program library is requested. 
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7.4 

EDITSYM 

EXAMPLES 



Create a program library. 



REQUEST NPL. 
REWIND (NPL) 
EDITSYM (NPL, L) 



♦COMDECK, MACROS 



*END 

*COMDECK, DIMENS 



*END 

*DECK, PROGA 



*END 

*DECK, PROGB 



*END 

♦DECK, FTNPROG 



*END 

*DECK, FTNSUBR 



*END 



macro definitions 



dimension statements 



COMPASS subprogram 
containing *CALL, MACROS 



COMPASS subprogram 
containing *CALL, MACROS 



FORTRAN program con- 
taining *CALL, DIMENS 



FORTRAN subroutine 
containing *CALL, DIMENS 
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Modify and assemble PROGB from the program library created in the 
preceding example. 



REQUEST OPL. 

REWIND (OPL) 

EDITSYM (OPL.C) 

COMPASS (I=COMPILE,B=PUNCHB) 



\ 

♦INSERT, 300 
♦DELETE, 2,3 



♦EDIT, PROGB 

\ 



'•. 



Modify and assemble/compile the program library in the preceding examples; 
also add two decks and create a new program library. Catalogue the new 
program library. 



REQUEST, OPL. 
REQUEST, NPL. 
REWIND, NPL. 
REWIND, OPL. 
EDITSYM (NPL, OPL) 
COMPASS (I=ASSEM) 
RUN(S,,,COMPL) 



\ 

♦COMPILE, COMPL 
Correction deck 



60189400 Rev. C 



7-9 



♦EDIT, FTNPROG 
*COMPILE, COMPL 

Correction deck 
*EDIT, FTNSUBR 
♦COMPILE, ASSEM 

Correction deck 
*EDIT, PROG A 
♦COMPILE, ASSEM 

Correction deck 
♦EDIT, PROGB 
♦DECK, PROGC 

Source deck 
*END 
*DECK, PROGD 

Source deck 
♦END 
♦CATALOG, NPL 

\ 



V 
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CHECKPOINT/RESTART 8 



CHECKPOINT/RESTART is a system facility which captures the total 
environment of a job on magnetic tape so that the job may be restarted from 
the same point in processing. Total environment includes local files asso- 
ciated with the control point of the job. For mass storage files (drum or 
disk) , the complete file is captured as well as the relative position within 
that file. For magnetic tape files, only the relative position on the tape is 
captured, so the tape may be properly re -positioned during restart. 

Checkpoint/Restart cannot handle: 

Respond jobs 
Rolled-out jobs 
Random files 
Common files 
Multi-file reels. 



When a programmer takes a checkpoint dump during job execution a file is 
written containing all information needed to restart the job at that point. In 
the event of machine malfunction, operator error, or program error, the 
job can be restarted from the last checkpoint rather than the beginning of 
the job. 

8.1 

CHECKPOINT 

REQUEST A checkpoint dump may be requested by a CKP control card in the job stream, 

an executing program, or by a console message entered by the operator. 
An executing program would request CHECKPOINT at logical points within 
its execution such as end-of-file, x logical records processed, x seconds 
of elapsed time, etc. CHECKPOINT requests may be issued more than 
once. CHECKPOINT is requested as follows: 



60189400 Rev. K 8-1 



CHECKPT param, sp. 



59 


11 




39 


35 


29 


23 


17 




RJ 


CPC 


£H:5:5:-:&:& 


CKP 


1 


1 




sp 




param 



59 



sp = zero indicates all mass storage files are to be processed 

sp = nonzero indicates a limited set of files 

param Address of a parameter list within user's relocatable code; 



format follows: 



17 



11 





n 


0000 


lfnl 


fl 






lfn2 


f2 










lfnn. 


fn 


• ;';_■ ;!;; : :-;';v! !;•{ :': : ;S ;!,;•;>: 



n defines number of terms in the list (number of lfn entries); 
maximum value is 42, Q . 

lfn^ name of the i-th user mass storage file in list. 

fj flag indicating specific manner in which Ifnj is to be processed. 

The low order 12 bits of the first word in the list must be zero during each 
call to CHECKPOINT. The user should clear these bits before each CHECKPT 
request because preceding checkpoint calls will have set them to a non-zero 
value. 

For a general call to CHECKPOINT using the macro call, the sp field will be 
zero: 

If n = 0, all mass storage files assigned to the control point including 
INPUT, OUTPUT, PUNCH, PUNCHB, and LGO will be copied to the 
CHECKPOINT dump tape in the manner determined by the last code/ 
status (f flags) . 

If n ^ 0, all mass storage files named in the lfn list will be copied to the 
CHECKPOINT dump tape in the manner determined by the f flags, except 
for system mass storage files which are copied as determined by the last 
operation performed on each file. 
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The f flags can have only the following values: 

If f = 0, the mass storage file is copied from beginning of information to 
its present position at checkpoint time; and only that portion will be 
available at restart time. The file is positioned at the latter point. 

If f = 1, the mass storage file is copied from the present position at 
checkpoint time to end of information; and only that portion will be 
available at restart time. The file is positioned at the former point. 

If f = 2 or 3, the mass storage file is copied as determined by the last 
operation on that file. Generally, these values of f are used when the 
value of sp is non-zero. 

If the value of the sp field is non-zero in the macro call, only the lfn's 
supplied by the user in the param list plus system files will be processed. 
Processing is determined by the f flag settings. 

When the manner of copying a mass storage file is to be determined from 
the last operation on the file, CHECKPOINT derives f-values from the last 
code/status as follows: 

f = if code/status ends in 4, 5, 6, or 7. 

f = if code/status ends in 0, 1, 2, or 3 and end-of -information bit is set. 

f = 1 if code /status ends in 0, 1, 2, or 3 and end-of -information bit is 
not set. 

This generally causes the entire mass storage file to be copied for write 
operations, read operations resulting in end-of-information status, and rewind 
operations (excluding some OPEN functions). 

Examples: 

For COMPASS users: 

CHECKPT PARAM 

PARAM DATA 

All mass storage files would be CHECKPOINT processed (sp=0, n=0). 

All operator or CKP control card requests are processed in the same 
manner as this example. 
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For FORTRAN (RUN) users: 

DATA (variable=0) 

! or variable=0 

CALL CHEKPTR (variable) CALL CHEKPTR (variable) 

For FORTRAN Extended users: 

DATA (variable=0) 

! variable =0 

CALL CHEKPTX (variable) CALL CHEKPTX (variable) 

For the above examples checkpoint processing is performed for all mass 
storage files as described above for sp=£, n=0. Selected files may be pro- 
cessed if the pattern shown in the following example is followed. 

DIMENSION KPARAM(4) 
KPARAM(1)=30000B 
KPARAM(2)=5LTAPE1. OR. 10000B 
KPARAM(3)=6LTAPE23. OR. 10000B 
KPARAM(4)=5LTAPE3 

CALL CHEKPTR(KPARAM.l) or CALL CHEKPTX(KPARAM, 1) 

CHECKPOINT requests from overlay programs 

The user should rewind the overlay files prior to requesting CHECKPOINT if 
they are on mass storage. 

FORTRAN overlay programs should declare the mass storage overlay files 
to be TAPEn files and use REWINDn before CALL CHECKPTR (variable) or 
CALL CHEKPTX (variable). 



8-4 60189400 Rev. I 



Example for FORTRAN (RUN) users: 

OVERLAY(TAPE9,0,0) 
PROGRAM MAIN(. . . ,TAPE9) 
DATA(FILE=5LTAPE9) 

CALL OVERLAY (FILE ,1.0) 

END 

OVERLAY (TAPE 9, 1,0) 
PROGRAM OVER1 
DATA PARAM/OB/ 

REWIND 9 

CALL CHEKPTR(PARAM) 

END 



CHECKPOINT requests from COBOL and SORT/MERGE 

Refer to the COBOL and SORT/MERGE manuals for CHECKPOINT/ 
RESTART description. 



CHECKPOINT dump tape 

With a REQUEST control card the user may specify an unlabeled tape 
with checkpoint disposition on which the checkpoint'dumps are to be written. 
This REQUEST should be the first control card of the job. If no such 
tape is supplied, CHECKPOINT will define an unlabeled tape with the 
name CCCCCCC as a local file the first time CHECKPOINT is requested 
including operator initiated checkpoints. In any event, only one check- 
point dump tape should be defined for the job. 

CHECKPOINT/RESTART defines the following files for its use: 

CCCCCCC 

CCCCCCI 

CCCCCCM 

The user should refrain from using these file names. 
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8.2 

RESTART 

REQUEST 



The RESTART control card directs a job to be restarted from Its checkpoint 
tape. This card has five possible formats: 



RESTART, name,*. 
RESTART,*, name. 



RESTART, name. 
RESTART,*. 



RESTART. 



name Name of checkpoint file as defined at checkpoint time. If the name 

expression is omitted, the file name CCCCCC is assigned as a 
default value. 

# Number (decimal) of checkpoint to be restarted. If the expression 

is omitted, a default value of 1 is assigned by RESTART. If the 
number is greater than the number of the last checkpoint taken, the 
restart attempt will be terminated. 

After locating the proper checkpoint dump on the checkpoint tape , the restart 
program requests all tape files which were defined at checkpoint time, and 
repositions these files. The restart program also re-establishes all mass 
storage files from the copies appearing on the checkpoint tape, restores the 
central processor program, and restarts the user's job. 

The restart job should not contain any REQUEST control cards; RESTART 
requests all necessary files internally. 

Permanent files are not copied to the checkpoint tape. However, if any per- 
manent files are attached to the control point when CHECKPOINT is called, 
their local file names will be listed in the job dayfile with a message. 

The user should attach all these permanent files to the control point, and 
reposition them before calling RESTART. 

Any ECS user area attached to the control point will be copied in its entirety 
to the checkpoint tape. At restart time, it will be recopied to ECS from the 
checkpoint tape. On the job card for the restart job, the user must request 
at least as much ECS as was attached to the original checkpointed job. If 
reconfiguration results in insufficient ECS available to the user, restart is 
not possible. 



8.3 

UNRESTARTABLE 

CHECKPOINT DUMPS A checkpoint dump may not be restartable in the following cases: 

A tape file necessary for restarting the program was overwritten after 
the checkpoint dump was taken. 

A machine error propagated bad results but did not cause abnormal 
termination until after another checkpoint dump. 
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SYSTEM/OPERATOR COMMUNICATION 



9.1 

DISPLAY 

CODES SCOPE communicates with the operator through two or more console display 

screens and a keyboard. The major display programs are the System Display 
(controlled by the program DSD) , and the Control Point Job Display (con- 
trolled by the program DIS) . 

The system indicates the status of operations on the console screens. The 
operator may introduce jobs, change job priorities, and examine selected 
portions of memory via the keyboard. Data entered from the console is also 
displayed. A permanent record of all system/console communication is 
retained by the system in a dayfile which may be printed at operator request. 



9.1.1 

DSD The display console is normally controlled by the system display package 

DSD, which permanently resides in peripheral processor 9. DSD maintains 
a current display of the system status and processes keyboard entries from 
the operator. At the console keyboard, the operator may assign equipment, 
exercise control over execution and job scheduling, initiate utility programs, 
select displays, etc. 

The screens may be assigned to any combination of two displays: 
Name Display 



A 


System or control point dayfile 


B 


Job status (for all control points) 


C 


Data storage 


D 


Data storage 


E 


Equipment status 


F 


File name table 


G 


Program storage 


H 


Input/output queues 


I 


Unprocessed control cards 


J 


JANUS control point status 
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Name Display 

K Control point area or system table addresses 

L Central programmable 

M PP communications area 

N Reserved for PP debugging display; available from VIM 

O Operator messages 

Y Command format syntax dictionary 

Z Display dictionary 



9.1.2 

DIS DIS, similar to DSD, displays information relevant to a single job assigned to 

a control point. Under DIS, the B display shows the exchange jump area of a 
job. Central memory addresses relative to a job's reference addresses are 
used for data and program display. DIS can be brought to a control point to 
monitor the progress of a job, or it can be brought to an empty control point 
to initiate utility routines, change priorities and suspend job execution. 

For a complete description of DSD and DIS, their displays, keyboard com- 
mands and error messages, see the SCOPE Operator's Guide. 
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UTILITY PROGRAMS 10 



The SCOPE library contains a set of PP and CP utility programs which can 
be called by control cards or by keyboard entries. 

Card-to-tape, tape- to- tape , tape-to-print, card-to-central storage, and 
central storage-to-punch operations as well as general file manipulation are 
possible. Utility operations can be performed with named files, each of 
which designates a specific peripheral device, such as a card reader, tape 
unit, printer, card punch or mass storage unit. 

Before the first reference to any named file, an equipment should be assigned 
to it by the operator with the ASSIGN statement or by the programmer with 
the REQUEST statement; otherwise, the system assigns the file to a mass 
storage unit. All files, except mass storage, specify a unique peripheral 
equipment and all references to a specific equipment are made through the 
file name. 

Utility jobs conform to the normal deck structure. The job deck contains the 
following cards: 

Job card first control card 

Request cards equipment assignment 

Program cards data operations 

6/7/8/9 end of job 

The job card includes name, priority, time limit and field lengths. If only 
utility programs are to be executed, a short field may be specified. In all 
copy operations, the central memory buffer is automatically set up to use the 
entire field length of the job. Some operations between high speed devices 
may be accelerated with a larger field length. 

The operator should be requested to assign equipment to all necessary files 
which do not reside on the mass storage. Tapes can be rewound and posi- 
tioned upon request. Each utility program is called by specifying its name 
starting in column 1. Parameters for execution of the program appear in 
parentheses after the name. 

Example: 

To print the third and fourth coded files from a tape: 
TAPEPRT,T520,CM1000,P6. (Job Card) 
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Assign unique file name MAGTAPE with a REQUEST control card to a tape 
unit: 



REQUEST , MAGTAPE , MT. 

REWIND(MAGTAPE) 

COPYCF(MAGTAPE,XX,2) 

COPYCF(MAGTAPE, OUTPUT, 2) 

6/7/8/9 



Operator would assign specific tape unit. 

Rewinds tape unit to be sure of position. 

Skips tape to beginning of third file by 
copying first two files to an unused 
dummy file XX. 

Copies the two coded files to the output 
file. OUTPUT is automatically printed 
at end of job. 

End-of-file card completes the job. 



10.1 

COPY ROUTINES 



COPY TO END-OF-INFORMATION 



COPY(file l.file 2) 



The named file 1 is copied onto file 2 until a double end-of-file or end-of- 
information is detected on file 1. Both files are then backspaced over the 
last file mark. If parameters are omitted, INPUT, OUTPUT are assumed. 
COPY will not operate on S or L tapes, on labeled tapes, or on BCD tapes. 

This routine may be used to copy a tape even if the number of files on the tape 
is not known. A sample deck structure would be as follows: 



A" 



/COPY(TAPE 1, TAPE 2f 
/REWIND (TAPE 2) 



/REQUEST TAPE 2.MT. 



7REWIND(TAPE 1) 



/REQUEST TAPE 1,MT. 



/JOB, P17 , T100, CM3000 . 
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MULTI-PURPOSE COPY 

The system library multi-purpose copy routine is a CP routine with entry 
points COPYCR, COPYCF, COPYBR, COPYBF. If the number of records 
or files is unknown or not readily determined, an exceedingly large para- 
meter may be specified. The following parameter information is pertinent 
for the four copy control cards that follow: 

file 1 and file 2 name the input and output files. Information is copied 
from file 1 onto file 2. If these files are not specified by name, INPUT 
and OUTPUT are assumed. 

n is a decimal number indicating how many files or records are to be 
copied. If n is omitted only one file or record is assumed. 

L indicates that the first record on the input file contains label information 
that is to be copied onto the output file header label. When the L parameter 
is used, file 1, file 2, and n are also required. 

COPY BINARY FILE 

COPYBF (file l,file2,n,L) 

COPY CODED FILE 

COPYCF(filel,file2,n,L) 

COPY BINARY RECORD 

COPYBR(filel , f ile2 , n , L) 

COPY CODED RECORD 

COPYCR(filel,file2,n,L) 

The first two routines terminate when the specified number of files are read, 
or when an end-of -information is encountered. 



The latter two routines terminate when the specified number of records are 
read or when a file mark is encountered. For example, if the card specifies 
100 records but the file contains only 50 records, the copy operation termi- 
nates after 50 records. 

General Comments pertaining to COPYBF. COPYCF, COPYBR. COPYCR 

Error recovery is handled by SCOPE. If, after a number of re-trys, a 
parity error persists (a PARITY ERROR message appears on the console 
display), the copy should be abandoned by the operator due to the indeterminate 
state of the data. 
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When an end-of-reel is detected, the next reel is obtained, label checking/ 
writing is performed if the tape is labeled, and the function continues 
normally on the next reel. 

If an end-of-file is encountered on the input file before the record count is 
exhausted, the copy operation will cease (but not abort) at that point. A 
message is entered in the dayfile. An EOF is written on file2 and backspaced 
over and file is left open. 

If an end-of-information is encountered on the input file before the record/ 
file count is exhausted, the copy operation will cease (but not abort) at that 
point. A message is entered in the dayfile; an EOF is written on file 2; both 
files are closed. 

The copy routines open the files specified on the copy control card. At the 
conclusion of the copy operation, only those files on which EOI has been 
encountered are closed. The COPY routines require a field length of 

20000B. 

Although not primarily implemented for that purpose , the copy routine is 
capable of limited format conversion. The following matrix shows format 
conversion copies that can be handled successfully: 



SCOPE 



H 

Oh 

2 



SCOPE 



OUTPUT 
X S 



Yes 


Bin Yes yS 

.•'BCD 
y^ Yes 2 


Yes 1 


Yes 


Bin Yes yS 

^-"bcd 

yS Yes 2 


Yes 3 


Bin y/ 
Yes \yS 

y^mv> Yes 


Yes 


Bin Yes yS 

/ BCD 
yS Yes 1 


Bin Yes y/ 

•^BCD 
y*r Yes 2 


Yes 


Yes 


Bin Yes yS 
yS Yes 1 


Bin Yes y/" 

/""'BCD 
yS^ Yes 2 


Yes 1 


Yes 



NOTES: 



Conversion of this type cannot be guaranteed because of possible trunca- 
tion of the input record. Maximum record size for S tape output files is 
512 words (5120 coded characters). Maximum physical record size for 
coded SCOPE tapes is 1280 characters. If these sizes are exceeded, the 
output record is truncated and the copy allowed to proceed after entering 
a message into the dayfile. 
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2. Because of potential loss of data significance within the format conver- 
sion, the output data cannot be guaranteed; a diagnostic is entered in the 
dayfile and the copy allowed to proceed. 

3. BCD records may be up to 136 characters on input and will always be 136 
characters on output. 

COPY LABEL CARD FORMAT 



f 



COPYIAB(IAB=x,EN=x,RN=x,CD=x,RC=x,MFN=x,PN=x) 



If an L parameter is specified on any copy control card that routine will read 
the next record on the input file and that record should contain the *COPYLAB 
card. The LAB parameter is required; all others are optional and will be set 
to system default values if omitted (section 3.3). 

Maximum characters 

17 

2 
4 
5 
3 
6 
3 

Columns 1-9 must contain *COPYLAB, or *COPYIAB( 

LAB must be the first parameter, others are order independent. 

All fields are separated by commas. 

Blanks are not permitted between fields. 

Imbedded blanks may appear in the LAB field only. 

The end delimiter is a period or right parenthesis. 

The L parameter must appear on the copy control card if the input or output 
file is declared labeled. If the copy of a labeled tape is to retain the existing 
input label, the COPYLAB card requires only the label name. 

Example: *COPYLAB(LAB=NAME). 



LAB= 


Label name (written on output 




and used to open input if 




labeled) 


EN= 


Edition number 


RN= 


Reel number 


CD= 


Creation date 


RC= 


Retention cycle 


MFN= 


Multi-file name 


PN= 


Position number 
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COPY SHIFTED BINARY FILE 



COPYSBF(file 1, file 2) 



A single file is copied from file 1 to file 2, shifting each line one character 
and adding a leading space. If parameters are omitted, INPUT, OUTPUT 
are assumed . 

This routine is used in formatting a print file where the first character of 
each line is not a control character and is to be printed. The space charac- 
ter added will result in single line spacing when the file is printed. 

Example: 

Control cards to print a Hollerith card file. The Hollerith card file read by 
the operator-assigned card reader will be printed on OUTPUT file of job 
CARDCPY. 



/cOPYSBF (CARDS, OUTPUT) 



/REQ UEST, CARDS, CR. 



/CARDCPY , PI , T100 , CM3000 
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COPYBCD 

COPYBCD(filel ,file2 ,n) 



This routine copies packed output files to a magnetic tape where each line 
image is a discrete physical record, so the tape may be listed offline. 

Default values for the parameters are INPUT, OUTPUT, and 1 respectively. 

Allowable control card formats and the interpretation of each is given below: 

COPYBCD. (INPUT , OUTPUT, 1) 

COPYBCD(n) (INPUT, OUTPUT, n) 

COPYBCD(filel) (filel, OUTPUT, 1) 

COPYBCD(filel ,n) (filel , OUTPUT ,n) 

COPYBCD(filel ,file2) (filel ,file2 , 1) 

COPYBCD(filel ,file2 ,n) (filel ,file2 ,n) 

Any other format or illegal file names will cause the job to terminate with 
the dayfile message CONTROL CARD ERROR. 

COPYN 



COPYN (p 1 , out, inj , in 2 , . . . , in 10 ) 



Logical records from up to ten binary input files (inj-inj^g) may be extracted 
and written on an output file (out) . 

Record format is j 
indicated by p-^; a non-zero value indicates the identification field (ID) of the 
logical records is to be omitted from the output file , zero indicates the 
records are to be copied verbatim. If records do not contain an ID, they are 
copied verbatim. 

Text cards associated with the COPYN routine determine the order of the 
final tape. A routine may be selected from a composite tape, temporarily 
written on a scratch tape and transmitted as input to a translator, assembler, 
or programmer routine, eliminating the need for tape manipulation by the 
second program. Several tapes may be merged with COPYN to create a 
composite COSY or library tape. In its most basic form, COPYN can per- 
form a tape copy. 

The file names (in^ia-iQ) reference binary files on tape, mass storage, or 
cards. A binary tape file consists of the information contained between load 
point and a double end-of-file; the tape file may contain any number of single 
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end-of-file marks. A mass storage file ends with one file mark, and a card 
deck must be terminated by a record separator (7,8,9 punch in column one). 
The output file name may reference mass storage, tape, or card punch. A 
file mark for an output tape is written by a WEOF card or it may be copied in 
a range of records and counted as a record. 

Records to be copied may or may not have an ID prefix control number 
(12 bits) , number of words in the prefix (12 bits) , and the name associated 
with the logical record. A record ID format consists of the first seven char- 
acters of the first word of each logical record. If logical records of the input 
file are not prefixed, all record identification cards must use the record 
number - the position of the logical record from the current position of the 
file. 

REWIND, SKIPF, SKIPR, WEOF (write End-Of-File) , and record identifica- 
tion cards may be used in conjunction with COPYN: these text cards are 
read from INPUT and are terminated by a record separator (7, 8,9 punch 
in column 1). The text cards are free field; they may contain blanks but 
must include the separators indicated in each card description. 



REWIND 



REWIND (p) 



This card generates a rewind of file p which must be one of the input or 
output file names given on the COPYN control card. File p may not be the 
system INPUT file. 



SKIPF 



SKIPF (p,±n) 



With this card, n file marks on file p may be skipped. File p must be a 
tape; requests for other types of files will be ignored. The skip may be 
forward (+n) or backward (-n) . There is no indication when SKIPF causes 
a tape to go beyond the double end-of-file or when the tape is at load point. 
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SKIPR 



SKIPR (p,±n) 



With this card, n records may be skipped on file p. File p must be a tape; 
requests for other types of files will be ignored. The skip may be forward 
(+n) or backward (-n) . Zero length records and file marks must be included 



in n. 



WE OF 



/ WEOF (p) 



This card writes a file mark on file p, which must be one of the input or 
output file names on the COPYN control card. 

RECORD IDENTIFICATION CARD 



^P> 2 ,P 3 



The parameters on this card identify a record or set of records to be 
copied from a given file. 

p Record to be copied or the beginning record of a set of records to 
1 be copied. The name associated with the record or a number giving 
the position of the record from the current position of the file may 
be specified. 

p Last record to be copied in a set of records. 

name logical records p through p^ are copied. 

decimal integer n n logical records are copied, beginning with 
p,. Zero length records and file marks 
are counted. 

* p through an end-of-file mark are copied. 

** p through a double end-of-file mark are 

copied . 

/ p through a zero length record are copied. 

or blank only p is copied. 



10 _ 8 60189400 Rev. I 



P 3 Input file to be searched. If p x is a name, and p 3 is omitted, all 



input files declared on the COPYN card are searched until the p 

If Pi 



record is found. If it is not located, a diagnostic is issued, 
is a number and p„ is omitted, the last input file referenced is 
assumed. If this is the first text card, the first input file on the 
COPYN card is used. 



Examples: 



SIN, TAN, INPUTA Copies all logical records from SIN through TAN 
from file INPUTA. 



SIN, 10, INPUTA 
SIN, TAN 



SIN, , INPUTA 
1, TAN, INPUTA 



Copies 10 logical records from file INPUTA, from 
SIN through SIN+9. 

Searches all input files beginning with current file. 
(If this is the first text card, the first input file 
named on the COPYN card is used). When SIN is 
encountered, all logical records from SIN through 
TAN are copied. 

Copies logical record SIN from file INPUTA. 

Copies the current logical record through TAN 
from file INPUTA. 



1,10, INPUTA Copies 10 logical records, beginning with the 

current logical record on file INPUTA. 

1 , *, INPUTA Copies the current logical record through the first 

file mark encountered on file INPUTA. 



FILE POSITIONING 

The files manipulated during a COPYN operation are left in the position 
indicated by the previously executed text card, they are moved only during 
a search. If file name (P3) is omitted from the record identification card, 
all files on the COPYN card will be searched end-around. The end of a file 
is determined by a double end-of-file if tape , or a single end-of-file if mass 
storage. The first input file declared is searched until either p-^ or the 
original position of the file is reached, whereupon a search of the second 
input file begins. In this manner, all files remain effectively in the same 
position except the file containing p-p which is positioned at P 2 +l- 
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The output file is not repositioned after a search so that the COPYN routine 
may be re-entered, if desired. Therefore, the programmer is responsible 
for any REWIND, SKIP, or WEOF requests referencing the output file that 
may be necessary prior to exiting the job. 

Example 1: Record identification card: REC,,INPUT1 

Input file INPUTI: 



ABLE BAKE I 




REC 


SIN 


TAN 


ZEE 


EE 
OO 
FF 



If INPUTI were positioned at TAN, TAN and ZEE would be examined for 
REC. The double end -of -file would cause ABLE to be the next logical 
record examined, continuing until REC is read and copied to the output 
file. INPUTI would then be positioned at SIN. 



Example 2: 



Record identification card: RECA 



Al 


Bl 




Zl 


EE 
OO 

FF 



A2 


RECA 


D2 


EE 
OO 

FF 



A3 


B3 


C3 




Z3 


EE 
OO 

FF 



Input file INPUT, 1 
positioned at Bl: 



Input file INPUT2, 
positioned at loadpoint 

Input file INPUT3, 
positioned at loadpoint 



All routines from Bl through Al are compared to RECA and INPUTI is 
repositioned at Bl. A2 is compared, then RECA is copied to the 
output file and INPUT2 is positioned at D2. INPUT3 is not searched. 

Example 3: 

Record Identification cards and binary logical records on INPUT file. 

REC,, INPUT 

JOB1.JOB3, INPUT 

ABLE,,IN2 

Record Separator (7,8,9 punch in column 1) 

REC (binary) 

Record Separator 

JOB1 (binary) 

Record Separator 

JOB2 (binary) 

Record Separator 



10-10 



60189400 Rev. I 



JOB3 (binary) 
Record Separator 

Since there is no end-around search of the INPUT file, EEC and 
JOB1-JOB3 must directly follow the requesting record identification 
cards in the order specified by those cards. An incorrect request for 
an INPUT record terminates the job. 



ERROR MESSAGES 

The text cards are written on the system OUTPUT as they are read and 
processed. When an error occurs, the abort flag is set, and a message is 
printed (Appendix H) on OUTPUT followed by the card in error. This card 
is not processed and an attempt is made to process the next text card. When 
the last text card is processed, the abort flag is checked; if it is set, the job 
is terminated. Otherwise, control is given to the next control card. 



COPYL 



/COPYL(file l.file 2, file 3) 



This program allows for selective replacement of one or more routines. File 
1 contains the old set of decks; file 2 contains the replacement routines, and 
file 3 contains the updated set of decks. Files 1 and 2 are not rewound*, and 
processing continues until the end -of -file on file 1. Routines on file 2 need not 
be in any order. 



Example : 



COPYL(OLD, CORR.NEW) 
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The following job will update 1AJ, IRA, and 2TS from a tape (OLD) which 
presumably contains the binary decks of these and other system routines. 
CORR will contain the new 1AJ, IRA, and 2TS and the new file will be written 
on a tape file called NEW. 

JOB,CM60000,T1000. 

REQUEST OLDPL. (UPDATE LIBRARY TAPE) 

REWIND(OLDPL) 

UPDATE(Q) 

COMPASS (I=COMPILE ,B=CORR,S=SCPTEXT) 

REQUEST OLD. 

REWIND(OLD) 

REQUEST NEW. 

REWIND(NEW) 

COPYL(OLD , CORR, NEW) 

UNLOAD(NEW) 

REWIND(OLD) 

7/8/9 

*IDENT,TEST 

Modifications to 1AJ, IRA and 2TS 

♦COMPILE 1AJ, IRA, 2TS 

7/8/9 

6/7/8/9 

COPYL can be used to find out the contents and order of routines on a dead- 
start tape by declaring the deadstart tape to be the correction file for a 
dummy file. 

Example Jobcard. 

REQUEST, SYSTAPE, HI. Assign deadstart tape 

REWIND(SYSTAPE) 

COPYL(DUMMY , SYSTAPE , DUM) 

7/8/9 

6/7/8/9 

COPYL will list all the routines on SYSTAPE in order as 
none exist on the file DUMMY. 

COPYL Messages 

Listing Messages: COPYL DONE 

COPYL DID NOT FIND xxxxxxx. 
ILLEGAL COPYL PARAMETER 



Display Message: UPDATING xxxxxxx. 
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10.2 
FILE 
MANIPULATION REWIND FILE 



(' 



REWIND(file 1 . . . ,'file n) 



All files specified are rewound. 
UNLOAD FILE 



fi 



UN LOAD (file 1 . . . ,file n) 



All files specified are rewound and unloaded. This function issues a CLOSE, 
UNLOAD and releases the file assignment to the control point. The UNLOAD 
macro only rewinds and unloads the files. The UNLOAD control card, how- 
ever, is similar to RETURN. 

SKIP OPERATIONS 

SKIPF (lfn, n, lev, m) 

SKIPF causes one or more logical records to be bypassed in a forward 
direction. The request may be initiated at any point in a logical record. 

SKIPB(lfn,n,lev,m) 

SKIPB causes one or more logical records to be bypassed in a reverse 
direction. The request may be initiated at any point in a logical record. 

lfn Logical file name (1-7 digits or letters); must begin with a letter. 

n Number of logical records or record groups to be skipped, maxi- 

mum value is 777776g. n is a decimal number. A value equiva- 
lent to 777777g will be treated as a no-operation for SKIPF and 
as a rewind for SKIPB. 

lev Logical records are skipped until n end-of -records with level 

numbers greater than or equal to the requested level is reached; 
the file is positioned immediately following (for SKIPF) or pre- 
ceding (for SKIPB) the last record, lev is octal. 

m B for binary files, or C for coded files. 

The control card SKIPB. is interpreted as SKIPB(FILE, 1,0, B). The control 
card SKIPF. is interpreted as SKIPF(FILE,1,0,B). 
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BACKSPACE LOGICAL RECORD 



BKSP(filel,n) 

Multiple logical records are backspaced as specified by the decimal n. 
Backspacing terminates if it results in a rewound file. 



COMBINE 



(' 



COMBINE(fl,f2,n) 



For this operation, n(decimal) logical records are read from file fl and 
written as one logical record (level 0) onto file f2 . The file is not positioned 
prior to initiating this operation. If the files fl and f2 have not been pre- 
viously defined by REQUEST cards, they will be assumed to be on mass 
storage. 



10.3 

OCTAL CORREC- 
TION ROUTINE LOAD OCTAL CORRECTIONS 



This peripheral program may be called with a control card or at a display 
console. Octal corrections are read from the INPUT file and entered in 
central storage. The octal correction cards must be in the following format: 



23001 145020 04000 00042 00044 



Address begins in column 1; leading zeros may be dropped in the address. 
The data word begins in column 7; spacing in the data word is not important 
but the word must contain 20 digits. 

LOC. Reads all correction cards in the next INPUT file 

record and modifies central storage accordingly. 

LOC, 1000. Clears central storage from the reference address 

to the specified address; correction cards are then 
read from the INPUT file. 

LOC (2022, 3465) Clears central storage from the first specified 

address to the second; correction cards are then 
read from the INPUT file. This program may be 
called to clear storage by providing an empty 
record in the INPUT file. 
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10.4 

REQUEST FIELD 

LENGTH 



With the RFL card, the user can request a different field length during job 
execution; nfl is the new octal field length. 

RFL.nfl. 

RFL should be employed to obtain optimal usage central memory. For 
example, a FORTRAN program may require 45000 words of memory to com- 
pile, but only 5000 to execute. RFL should be used as follows: 



Example : 



JOB,T300,CM45000,P7. 

RUN(S) 

RFL, 5000. 

LGO. (execute program with FL=5000) 



10.5 

DUMP STORAGE 



This peripheral program may be called with a control card or from a display 
console in any of the forms shown below: 



DMP. 

DMP,x. 
DMP (x,y) 

DMP (4xxxxx,4yyyyy) 



Will dump the entire exchange package , RA to 
RA+100, and 100 locations before and after a 
stop location. I 

Will dump from the reference address to the 
parameter address. 

Will dump from the first specified address to 
the second. The entire control point area is 
dumped also if x is equal to y and non-zero. 

Produces absolute core dumps, xxxxx defines 
the lower bound, yyyyy defines the upper bound 
of absolute core locations. 



10.6 

DUMP EXTENDED 

CORE STORAGE 



The control card for this central program has the following calling 
sequence. 

DMPECS(x,y,f,lfn) 
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The program dumps ECS from location x' to y'. x' is the closest multiple 
of 10B less than or equal to x, and y' is the (closest multiple of 10B greater 
than y)-l. 

f selects the print format. 

f = or 1 4 words in octal and in display code per line. 

f = 2 2 words in octal parcels and in display code per line. 

f = 3 2 words in octal bytes and in display code per line. 

f = 4 2 words in octal and in display code per line, 

lfn Specifies the dump file; if absent or zero, file OUTPUT is assumed. 



10.7 

COMPARE One or more consecutive records on one file may be compared with the same 

number of consecutive records on another file to determine if they are identi- 
cal. The control card format is: 

COMPARE(fl,f2,n,l,e,r) 

fl,f2 Files to be compared 

n Number (decimal) of records in fl to be compared to f2 

1 End-of -record level number (octal) 

e Number (decimal) of non-comparison words to be written 

to the OUTPUT file 

r Number (decimal) of counted records to be processed during 

the comparison. Included in non-comparison record 
OUTPUT file if e parameter is given. 

Comparison begins at the current position of each file and continues until the 
number of ends -of -records of the level specified or a higher level has been 
passed over. If all pairs of records are identical, the dayfile message is 
GOOD COMPARE; otherwise, it is BAD COMPARE. Discrepancies listed 
on file OUTPUT depend on parameters on the COMPARE card. Examples 
follow: 

COMPARE(RED, BLUE) 
Compares next record on filcRED with next record on file BLUE. 

COMPARE(RED, BLUE, 6) 

Compares next six records regardless of level of end-of -record marks; but 
each end-of -record on file RED must have the same level as the corresponding 
end-of -record on file BLUE. 
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COMPARE(RED, BLUE, 3 , 2) 

Compares two files from their current positions up to and including the third 
following end-of -record with level number of at least 2. Both the records and 
the levels of their end-of-record must match to give GOOD COMPARE. 

The only indication of bad comparison between corresponding records will 
be the message BAD REC.n on OUTPUT, where n is the record number, 
counting the first one read on each file as number 1. If more information 
is wanted, errors and records must be specified as parameters. 

Example : 

COMPARE(GREEN, BLACK, 3 , 2, 5 , 1000) 

This will do the same comparison as the previous example, but for the first 
five discrepancies of a word in one file with the corresponding word in the 
other file, the words from each file will be listed in OUTPUT, together 
with their position in the record. The position will be indicated by an octal 
number, counting the first word as number 0. This will be done only for the 
first 1000 records read on each file in which discrepancies are found. 1000 
is chosen as an indefinitely large number, because the number of records to 
be compared is rather small, and details are wanted about all discrepant 
records. If two long files were to be compared, something like 20 might 
be given as the records parameter, so that a reasonably large number of 
discrepancies would be described in detail; but if through an error the two 
files were completely different, an enormous and useless listing would not 
be produced. Furthermore, the comparison will be abandoned if this limit 
is exceeded, and the files will be left positioned where they stand. 

A discrepancy between the levels of corresponding ends-of -records will be 
listed on OUTPUT, and the comparison will be abandoned, leaving the files 
positioned immediately after the disagreeing ends -of -records. 

Mode need not be specified in the COMPARE card. It is handled in the 
following manner. 

The first record of the first-named file (GREEN) is first read in the binary 
mode. If this produces a redundancy check, it is backspaced and re-read 
in coded mode. If this still produces a redundancy check, the fact is noted 
in file OUTPUT, the corresponding record of the second-named file (BLACK) 
is skipped over, and the process begins again. If the coded read is success- 
ful, the corresponding record of file BLACK is read in coded mode. If this 
record of BLACK gives a redundancy check, the fact is noted in file OUT- 
PUT, and nothing further is done with that record. Each record of file 
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BLACK will be read in the same mode as that in which the corresponding 
record of GREEN was successfully read; but if the record of GREEN was 
unsuccessfully read in both modes, the record of BLACK will be read in the 
same mode as the preceding record of BLACK. Once a record of GREEN has 
been read without redundance in one mode or the other, following records of 
GREEN are read in the same mode until a change is forced by a redundancy 
check. 



10.8 

AUTOMATIC 
PROGRAM 
SEQUENCER (APR) 



Mass storage records can be read in either mode; the above strategy imposes 
no difficulty if a tape file is being compared with a mass storage file, as long 
as the tape file is named first on the COMPARE card. When tapes are com- 
pared, all label information will be ignored. 



The Automatic Program Sequencer (or sequencer) allows jobs to be rerun at 
regular intervals and supplies necessary information to the jobs. Jobs are 
entered under the sequencer with control cards and, at the completion of the 
execution, are saved by the sequencer to be executed again at some future 
time. The control cards place the jobs under the sequencer, supply the inter- 
val or execution frequency, and provide the sequencer with certain utility 
functions. The operator can control the sequencer with console entries. The 
sequencer is a peripheral processor program (APR) and a table in central 
memory resident (T.SEQ). 



The CMR table T. SEQ is used by the sequencer program APR as a working 
storage area. It contains two types of entries: the first is for the APR 
program; succeeding entries are for jobs running automatically under the 
sequencer. Entries are numbered 00-nn (octal) where nn is the maximum 
number of jobs allowed under the sequencer, equal to one less than the length 
(L.SEQ) of T.SEQ. In the released system, L.SEQ = 7 and the maximum 
value of nn is 6. 
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CALLS FOR APR 



Calls to APR are processed by LOADER; two calls to APR are made as con- 
trol cards in a job deck: 



APR (l.xxxxnn) 



nn is the T. SEQ ordinal to which this job is assigned; 
execution frequency is xxxx octal minutes, nn must 
be two octal digits, 00<nn<L. SEQ; xxxx may be 
0000-7777 8 . Example: a job calling APR (1,3301) 
is placed under the sequencer as job number 1, to 
be run every 33 g minutes. If a job is already in the 
table, xxxx is ignored.. 

Suppresses separator pages, output, and dayfile of 
calling job. This affects only the control point and 
has no effect on the sequencer. Usually for identifi- 
cation, nn is set to the T.SEQ ordinal used to place 
the job under sequencer control. 



The following two calls to APR may be made by CPU programs by calling CPC 
29 17 



APR (11, nn) 



RJ 



APR 



0" 



"0 



CPC 



xxxxxx 



59 



20 



41 39 
Reads real-time clock and places it in byte 4 of address xxxxxx. 











29 






17 





RJ 


CPC 


APR 


1 


r 




10 


xxxxxx 







U 


59 


41 




39 






21 







Places CMRA, ECRA, and ECFL in location xxxxxx. This word will 
contain the values: byte = 0, byte 1 = 0, byte 2 = CMRA/lOOg, 
byte 3 = ECRA/lOOOg, byte 4 = ECFL/1000 8 . 

In either call, if xxxxxx is out of range, the control point is terminated and 
this message is issued: ILLEGAL ADDRESS REQUEST TO APR. 
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10.8.2 

CONSOLE 

ENTRIES The operator may control the sequencer by typing in SEQ, command. The 

commands are described in the SCOPE Operator's Guide (Pub. No. 60179600). 



10.8.3 

SAMPLE JOB 

STRUCTURE A job to be sequenced every 35s minutes would have the following structure: 

JOB Card 

APR(1, 003502) Save job for future execution (35g min. interval). 

Will be job number 2 in T. SEQ. 



:} 



Any job deck without a JOB card and 6/7/8/9 card. 
6/7/8/9 
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DEBUGGING AIDS 



11 



Debugging aids include SNAP, TRACE, and DUMP and are submitted as 
normal jobs. 



11.1 
TRACE 



The tracing capability provides an analysis of program execution. Instructions 
based on storage references, operand references, register usage and branch 
instructions are analyzed. Output is written on a local file named SNACE. 
If TRACE output is to be listed, SNACE must be rewound and copied to the 
standard output file (OUTPUT) . TRACE output always includes a dump of 
the contents of the P register, all operand registers involved and the result 
register. An initial message indicates where tracing begins and the range 
involved. A terminal message is written when tracing stops. 



Each instruction within a designated range is scanned for triggers, established 
by TRACE control card parameters. Traps are placed at instructions which 
contain triggers. As each trap is encountered during execution, the designated 
instruction is executed and the specified output is written on SNACE. TRACE 
continues until the specified parameters are satisfied and as long as the 
program remains inside the designated range. 

Instructions that are program modified or not executable may not be traced. I 
This restriction applies to IA, LA (and all related formats) and all words I 

between IA and LA. ■ 

Return jump instructions outside the range must be calls to simple subroutines, 
and they must return through the subroutine's entry point. Tracing stops when 
the subroutine is entered and resumes when the subroutine returns to the 
range, A return jump which does not return to L+l cannot be traced. | 

Tracing ranges can overlap and multiple outputs can be triggered. 

TRACE may be used with all system loading schemes except that programs 
loaded entirely from the library cannot be traced. OVERLAY/SEGMENT 
mode has special requirements (section 11.1.3). When TRACE cards are 
encountered, the system prepares TRACE tables to be referenced during 
subsequent loading. Calls for SNAP features cannot be traced. 



11.1.1 
SCOPE 
CONTROL CARD 



The following SCOPE control card initiates TRACE. 



( 



TRACE, pi, p2 pn. 
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The order of parameters is not significant except as noted below. All para- 
meters, except frequency, must appear. TRACE cards must be loaded 
contiguously. 



Parameter 

Range Identification : 
ID=i 



Initial address: 
IA=e or e+n 
IAl=e-n 
IAC=c or c+n 
IACl=c-n 



Description 

i is an optional, alphanumeric identifier (1-7 
characters) printed on TRACE output. If con- 
tinuation cards are used, it must appear some- 
where on the first card and on all continuation 
cards as the first parameter. 

e is an entry point name. 

c is a labeled common block name. 

n is an octal integer s 777777. 



Last address : 
LA=e or e+n 
LAl=e-n 
LAC=c or c+n 
LACl=c-n 



The tracing range includes all instructions 
from IA to LA (LA must be greater than IA), 



Branches outside range IA-LA terminate trace output. It resumes when 
control passes back into the range. Tracing for the specified range terminates 
until control passes back through the address at which tracing begins. 

The IAt flag, set when IA is encountered, is turned off only when LA t is 
encountered. When a trigger is encountered, only the output specifications 
with a set IAt flag are processed. The first time IA is passed through, the 
trace counter is changed to 1. The counter is incremented only if control 
passes through LA^ of the range prior to passing through IA again. Returning 
to IA before LA is encountered does not affect the frequency parameter count. 
Output is dependent upon the frequency parameters. 



^ References to IA apply to IA1, IAC, IAC1 also; references to LA apply to 
LAI, LAC, LAC1 also. 
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Parameter 



Description 



Frequency : 
Fl=n 
F2=n 
F3=n 



n is an octal integer; it must not be 0. If 
parameter is not specified, 1 is assumed. 

Fl Tracing begins Fist time IA is encountered. 

F3 Thereafter, tracing takes place every 
F3rd time IA is encountered. 

F2 Tracing stops F2nd time IA is encountered. 



Three trigger specification parameters are described below; at least one 
must appear on a TRACE card. 



Register trigger: 
TR=P,An,Bn, or Xn 



Masking trigger : 

TM=m,k k k 

1 z n 



Location trigger : 
TL=e or e+n 
TLl=e-n 
TLC=c or c+n 
TLCl=e-n 
TLB=b 

Register dump; 
RD 



n is the register number 0-7. 

Each instruction is examined to determine 
whether or not the specified register is used as 
a result register. The P register measures 
satisfactory completion of a conditional jump. 
It must be placed before other triggers; other- 
wise, traps are set for previously set traps. 

m is an octal mask. (5 or 10 digits) 

k is a match key associated with mask m . A 
mask (Boolean AND) of each instruction in the 
range is compared with all k's for that mask. 
If equality to any k is found, the instruction is 
used as a trigger. 

e is entry point name 

c is labeled common block name 

n is octal integer ^777777 

bis nth location in blank common 



Each instruction making an A-register reference 
to the location is used as a trigger. 

If RD is specified immediately following a trigger, 
(TR, TM, or TL) an octal dump of all A, B and 
X registers is included in the output. 



The two output specification parameters are activated when one of the trigger 
parameters is encountered. 
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Parameter Description 

Storage location i is an octal integer less than 100 

reference: 

OL=e,i or e+n,i When a trigger is encountered, i words beginning 

w ith the specified location are written in octal 
OLl=e-n,i format on SN ACE. i must be specified. 

OLC=c,i or c+n,i 

OLCl=c-n,i 

OLB=b,i 

Begister designator: When a trigger is encountered, i words beginning 

at the location specified in the designated 
OR=r,i register are written in octal format on SNACE. 

i must be specified. 

r is a register designator: An, Bn, Xn 

n=0-7 



11.1.2 

TRACE EXAMPLES 

AND OUTPUT /TRACE, ID=AA,IA=ST, LA=NT,TL=NT, RD,OL=ST, 77, F2=10. 



r 



ID=AA AA is the range identifier in messages produced 

each time the start or end of range is encountered 
and each time output results from trap execution. 

IA=ST ST is an entry point in user's program; it 

designates beginning of range. 

LA.=NT NT is an entry point in user's program; it 

designates end of range. 

TL=NT, RD Trigger which causes trap to be set each time 

NT is referenced within the stated range. 
At execution time , the trap in the instruction 
referencing NT causes TRACE output. 

RD causes a dump of the registers each time an 
instruction referencing NT is executed. 

OL=ST,77 Output trigger. Each time the instruction 

referencing NT is executed, 77 8 words are 
dumped beginning at the entry point ST. 

F2=10 Output is produced the first eight times the 

instruction is executed. (F parameters are 
assumed to equal 1 if not present on a trace 
card; therefore, Fl and F3=l.) 
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OUTPUT 

Assume: ST=4567 (IA) 

NT=4577 (LA) 

The instruction SA5 NT is present at location 4571. 
AA STARTS IN LOCATION 004567 
TRAP FOR AA AT 4571 
OPERAND REGISTERS, B0=000000 

K=004577 
RESULT REGISTER IS A5=004577 
B0=000000 
B 1=0 545 20 
B2 



X7=01040422000000000000 
004567 data data data 

004573 



data 



data 



004663 data data data 

AA ENDS IN LOCATION 004577 



/TRACE, ID=REGS,IA=START, LA=NEXT, TR=P, RD, TR=X6, OR=B4,6. 



ID=REGS 

IA=START 
LA=NEXT 

TR=P,RD 
TR=X6 



OR=B4, 6 



range identifier 
range limits 

trap triggers 



Each time a jump occurs, a trap is set 
and the registers are dumped (RD) . 
Each time X6 is usedt as a result 
register, a trap is set. 

Output consists of six words starting at 
the address in B4. 



tin this case, only once: no frequency parameters are specified; each is assumed 
to be 1. 
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/TRACE, ID=Q, IA=S, LA=E, Fl=3, F2=7, F3=2, TM=00700 , 00600, OR=B4, 7 . 



ID=Q 

IA=S } 
LA=E t 

TM=00700, 
00600 



F1=3,F2=7, 
F3=2 



OR=B4,7 



range identifier 
range limits 

trap trigger 



frequency 
requirements 



output trigger 



00700=octal mask 

00600=match key 

Whenever the third digit of an instruction 
is six, the designated output (OR=B4,7) 
occurs if the frequency requirements 
are met. 

Output is not to begin until the third 
time the range is passed through. It 
is to be repeated each second time 
thereafter through the seventh time 
the trap is encountered. 

Output consists of seven words of data 
starting at the address in B4 register. 



11.1.3 

TRACE IN OVERLAY 
OR SEGMENT 
MODE 



In overlay or segment mode, the DEBUG card (11.4. 1) with the T parameter 
must be present when the overlay file is generated. As the TRACE routine 
is loaded with SEGZERO or with the (0,0) level overlay, TRACE cards must 
appear just prior to the program call card which causes loading of the (0,0) 
level overlay or SEGZERO (section 11.5, Sample Deck Structures). 

When TRACE cards are encountered, the system prepares TRACE tables to be 
referenced during subsequent loading. The loader tables for overlays are 
read from the overlay file. As each overlay is loaded, TRACE'S which 
apply to it are established. Similarly, segment loading causes TRACE traps 
to be inserted. 



11.2 
SNAP 



The SNAP dump capability provides selective area printouts upon execution 
of specified instructions. Printing frequency is established by parameters. 
The dump format is variable. 
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When SNAP cards are encountered the system prepares SNAP tables (which 
are located in front of the loader tables). During subsequent loading SNAP'S 
are inserted which apply to the newly loaded programs. The SNAP control 
card may specify an entry point to a user supplied routine which is entered 
before the SNAP output is written. 

Prior to execution, the instruction at a SNAP triggered address (IA) is re- 
placed by a return jump to the SNAP routine or auser routine if specified. The 
replaced address is savedin the SNAPtables. When the trapped address is en- | 
countered during execution, the SNAP routine stores all registers. Routine 
parameters are contained in arrays; the addresses of the arrays are passed to 
the specified routine. The arrays contain: the saved registers, the parameters 
from the SNAP card, and the address at which the SNAP occurs. Following 
return from the routine , the SNAP dump is written on the local file SNACE 
or on an alternate file if an FET address is specified by the routine. To 
obtain listings, the dump written on local file SNACE must be copied onto 
the file OUTPUT. A user routine may set a flag to suppress output. 

Following the dump, saved instructions are executed before passing control 
to the trapped location + 1. If an alternate address is placed in the communi- 
cations area, SNAP will return to it after executing the saved instructions. 

SNAP cannot be used for programs loaded entirely from the library. The I 
instruction at IA must not be modified during program execution (a subroutine! 
entry point called by a return jump is modified) . j 



11.2.1 

SCOPE 
CONTROL CARD 



The following SCOPE control card initiates SNAP: 



SNAP, P^Pg.-'-.Pjj. 



Parameters may appear in any order except as noted below, 
cards must appear contiguously. 



All SNAP 



Parameter 



Description 



SNAP identifier: 
ID=4 



i is an optional 1-7 character alphanumeric 
identifier printed with the dump. If continuation 
cards are used, ID must appear somewhere on 
the first card and as the first parameter on 
continuation cards. 
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Parameter 



Description 



Address where trap 
is planted: 

IA=e,e+n, or a 

IAl=e-n 

IAC=c or c+n 

IACl=c-n 

First word address 
of area dumped: 

FWA=e,e+n,n, or a 

FWAl=e-n or n 

FWAC=c, c+n, or n 

FWACl=c-n or n 

FWAB=b 

Last word address 
of area dumped: 

LWA 

LWA1 

LWAC 

LWAC1 

LWAB 

Interval between 
words dumped: 

INT=n 

Dump format : 

F=code 



e is an entry point name 

c is a labeled common block name 

n is an octal integer 

a is an absolute address (relative to RA) 



b is bth location in blank common; other 
symbols are as in IA. 

n is assumed if e (or c) has appeared as a 
previous parameter on the card. Thus, 
address will be e+n, e-n, c+n, or c-n, as 
appropriate, a is assumed if e has not 
appeared yet on this card. 



Format is the same as for FWA. 
LWA must beaFWA. 



n is a positive octal integer; if not specified, 
1 is assumed. For a D dump, n is doubled. 



Designated by one or two of the following codes: 
One only of the characters may be : 

Octal dump 

M Octal dump with mnemonic operation codes 

1 Integer dump 

S Single precision floating point 

F If exponent = 0,1 format; otherwise, S 

format . 
D Double precision floating point dump (two 

words) 
C Display code dump 
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Parameter 



Frequency: 
Fl=n 
F2=n 
F3=n 



User's entry point: 
UR=p,rl, . . .rn 



Description 

The second character is optional; it may suffix 
or prefix any other designator. 
R Register dump. 

If FWA and LWA are present and F is not 
specified, octal (O) and register (R) dumps 
are given. If FWA and LWA are not present 
and F is not specified, a register dump is 
given . 

n is an octal integer. It cannot be zero; 1 is 

assumed if n is not specified. 

Fl Tracing begins the Fist time IA is 

encountered. 
F3 Therafter, tracing takes place every F3rd 

time IA is encountered. 
F2 Tracing stops the F2nd time IA is 

encountered. 

Optional parameter; must be last on the card. 

p specifies the user's entry point to be called 
before SNAP dump is taken, r parameters, 
passed to the routine, may be of two forms: 

Alphanumeric string, 1-10 characters, termi- 
nated by a zero byte. If the string contains 9 
or 10 characters, an extra word is required. 

Decimal integer, converted to binary, stored 
right justified. 

The parameter list is terminated by a -0 (word 
filled with sevens) which is used optionally by 
the user's routine. It has no meaning for SNAP. 



SNAP enters the user entry point in the following manner: 



L 
L+l 



L+2 
L+3 



RJ 



P (user entry address) 

TADR (FWA of loader SNAP tables) 

User parameters begin at FWA-10B and extend 
toward the reference address. 

RBO (FWA of register storage area) 

Return to user routine 

The user program must increment the return 
address by two so that return to SNAP will be 
at L+3. 
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Registers are stored one per word in the first 24 words of the register 
storage area as follows: 

B0-B7, A0-A7, X0-X7 

RBO+24 has the following format: 

Bits 

59 No-dump flag; if bit 59 is set, SNAP output is suppressed. 

This bit is cleared on entry to the user routine. 

18-58 Not used 

0-17 FET address can be inserted to designate an alternate file 

for SNAP output. 

RBO+25 has the following format: 

Bits 

18-59 Not used 

0-17 Address to which SNAP returns (address+1 of trapped 

instruction) . Address return can be changed by replacing 
the address in these bits. 



11.2.2 

SNAP CONTROL 

CARD EXAMPLES /SNAP (ID=AX,IA=L, FWA=B, LWA=B+150,F1=10,F2=35,F3=2, F=0) 



r 



Produces a dump in octal format labeled AX consisting of all locations from 
B to B+150 8 . The dump starts the 8th time the instruction at location L is 
encountered, and is taken every 2nd time thereafter through the 34th g time. 



r 



SNAP(ID=AX, IA=L, FWA=B, LWA=B+150, INT=5 , Fl=10, F2=35 , F3=2, F=0) 



Same as above , except every 5th word is dumped starting at location B and 
ending at location B+144-. 
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r 



SNAP(ID=AX, IA=L, FWA=B, LWA=B+150,INT=5) 



Continuation card: 



r 



SNAP(ID=AX, F1=10,F2=35,F3=2,F=RO) 



Each dump begins with the contents of all registers at the time of entry to 
SNAP. 



r 



SNAP(IA=TAG) 



The first time location TAG is executed, a dump is produced of the contents 
of all registers as they appeared upon entry to SNAP. 



(' 



SNAP(IA=HOOK, F=M, FWA=C, LWA=C+30,ID=SYM, UR=IN, 1, A, 2) 



When location HOOK is executed, control passes to a user subroutine (entry 
point=lN). If the user routine returns control to SNAP, and if the no-dump 
flag is not set (in RBO+24, bit 59), a mnemonic dump is taken (labeled SYM 
of locations C through C+30 g . Parameters 1, A, and 2 are appended to the 
loader SNAP tables. 

11.2.3 

SNAP IN OVERLAY 

OR SEGMENT MODE SNAP declarations are inserted as each segment is loaded. The SNAP routine 
is loaded with SEGZERO and with the (0,0) level overlay. The DEBUG card 
with the S parameter must be included when the overlay file is prepared. The 
DEBUG(S) card must appear immediately before the initiation of a segment 
load (section 11.5). With normal loads, the DEBUG card is not necessary. 



11.3 

DMP Upon normal or abnormal job termination, three dump formats are available: 

octal, labeled, change. 
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Octal 

Standard DMP option. If a DEBUG control card (section 11.4) is not present 
in a job, an octal core dump is produced when the DMP control card is 
encountered. 



Labeled 

If a DEBUG control card with no parameters is present, a labeled dump is 
produced when the DMP control card is encountered. Format of the dump is 
the same as for the octal dump; except as the origin of a common block or 
subprogram is encountered, the associated name is printed. Also, a relative 
address counter indicates the position of the first word on the line relative 
to the last encountered subprogram or common block. The DEBUG file is 
used to locate the origin and names of the subprogram and common blocks. 

The DMP card uses symbolic names as well as octal numbers; the two may 
be combined. (A common block name is preceded by an empty parameter.) 
The dump begins at the origin of the first parameter name and continues 
through the space occupied by the subprogram (or common block) mentioned 
as the second parameter. The second parameter origin must be greater than 
the first parameter origin. 

Example : 



r 



DMP(ALPHA, CAT) 



Produces a labeled dump of the program ALPHA and all locations through 
program CAT. Intermediate programs encountered are identified. 



If a job is in overlay or segment mode, the DEBUG file is updated with the 
loading of each overlay or segment. 



Change 

If parameter C is present on a DEBUG control card, a list of core locations 
which have changed from their initial values is produced when the DMP 
control card is encountered. When a job begins an execution phase, a core 
image of the entire field length is written on the DEBUG file. The image is 
compared with the contents of memory at the time of termination. The 
contents of changed locations are listed. A labeled dump always precedes a 
change dump. 
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Change dumps permit a swift analysis of subprograms entered, changed data, 
and modified instructions. Large areas of instructions or data which have 
remained constant need not be considered. 

A change dump will not be produced during overlay or segment mode. 



11.3.1 

DMP 

CONTROL CARDS 



DMP,xxxxxx. 



DMP(xxxxxx, yyyyyy) 



DMP. Dumps the exchange package, RAtoRA+100, andP-77 

to P+77 onto OUTPUT. The exchange package dump 
consists of P, RA, FL, RAECS, FLECS, EM, 
AO . . . A7 , BO . . . B7 , XO . . . X7 and the contents of 
locations A0-A7. Each line of the storage dump 
contains an address and the contents of from one to 
four central memory words starting at that address. 

Dumps from the reference address through the 
parameter address, xxxxxx. 

Dumps from address xxxxxx through yyyyyy. If 
the high -order bit of each 18-bit address is set, 
an absolute dump is given. (For example, DMP 
(400300, 400450) causes absolute locations 300 
through 450 to be dumped, not RA+300 through 
RA+450) . If a DEBUG file is created, xxxxxx and 
yyyyyy ma y t> e symbolic . Printing of a central 
memory word is suppressed when that word is 
identical to the last word printed. Its location is 
printed and marked by a right arrow. If xxxxxx 
and yyyyyy are equal, DMP (1,1), the control 
point will be dumped. 

DMP output will be suppressed when preset core is encountered. The last 
preset location will be marked by the symbol > in the output. 
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1 1 .3.2 

DMP EXAMPLES 



DMP(IOOO) or DMP(100,200) 

Interpreted as a standard DMP request except it can be labeled (with or 
without a change dump) if appropriate DEBUG cards are present. The 
following dumps must be labeled by inserting a DEBUG control cards 
previous to the DMP control card: 



Call 
DMP(CPC,IO) 

DMP(COPYL) 

DMP(100,COPYL) 
DMP(COPYL, 2000) 
DMP(COPYL, COPYL) 

DMP(,RED) 

DMP(, RED, , WHITE) 

DMP(,RED, ,RED) 

DMP(100,,RED) 

DMP(IDA,,RED) 

DMP(, WHITE, ELLA) 

DMP(, WHITE, 70000) 



Dump Beginning 
Start of program CPC 

Reference address 

RA+100 

Beginning of COPYL 

Start of program COPYL 

Reference address 

Start of common block RED 

Start of common block RED 

RA+100 8 

Start of program IDA 

Start of common block WHITE 

Start of common block WHITE 



Dump End 
End of program 

iot 

Beginning of 
COPYL 

End of COPYL t 
RA+2000 8 
End of program 
COPYL t 
Start of common 
block REDt 
End of common 
block WHITEt 
End of common 
block REDf 
End of common 
block REDt 
End of common 
block REDt 
End of program 
ELLAt 
RA+70000 g 



11.4 
DEBUG 



The DEBUG control card is required when debug aids are used with overlay 
or segment jobs or when a labeled or change dump is requested. The DEBUG 
control card applies to all subsequent loading and executions within a job. 
Any absolute program loaded completely from the system library, however, 
cannot use the debugging aids. Such routines can be debugged only when 
they are loaded from a user file. 



t One word beyond dump end is dumped also. 
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11.4.1 
DEBUG 
CONTROL CARD 



^DEBUG (C,T,S) (Parameters are optional.) 



C Labeled dump is followed by a change dump when the DMP card 

is encountered; if C is absent, only a labeled dump is produced. 

T In overlay mode, loads TRACE and SNAP routines with the (0,0) 

overlay; in segment mode, loads TRACE with SEGZERO. 

S In overlay mode, loads TRACE and SNAP routines with the (0,0) 

overlay; in segment mode, loads SNAP with SEGZERO. 

DEBUG cards with both C and T parameters (or with both C and S parameters) 
cannot appear in the same job: a change jump is not allowed in overlay or 
segment jobs. If such cards do appear, the job is not terminated, but the 
change dump is not produced. DEBUG(T) or DEBUG(S) does not signal a 
labeled dump. A DEBUG card with no parameters must be present to obtain 
a labeled dump without a change dump. 



11.4.2 

DEBUG USE 



Overlay loadin g t 

If a DEBUG card is included when an overlay is prepared, the loader inserts 
a record on the overlay file following the overlay. This record consists of the 
loader table information necessary for traces, and for snapshot and formatted 
dumps. When the overlay is loaded, the table information is extracted from 
the overlay file and placed on the DEBUG file. 



Normal loading/segment loading t 

Upon completion of loading, a local file is created. This file, named DEBUG, 
contains the loader table information necessary for formatted dumps. It is 
updated as each segment is loaded. During user loading, execution does not 
affect or is not affected by the DEBUG card except for user segment loading. 



tThe change dump does not apply to overlay or segment loading. 
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11.5 

SAMPLE 

DECK STRUCTURES TRACE run: 

job card 

COMPASS. 



TRACE (params) TRACE and SNAP cards appear immediately 

before program call card that initiates the 
LGO - 
REWIND (SNACE) 

COPYCF (SNACE, OUTPUT) 

\ 

(COMPASS SOURCE DECK) 

\ 
\ 
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Combined TRACE/SNAP run: 
job card 
COMPASS. 



COPYBR(INPUT, LGO) 
TRACE(params) 

TRACE(params) 
SNAP(params) 



TRACE and SNAP cards appear immediately 
before program call card that initiates the 
run. 



SNAP (pa rams) 

LGO. 

REWIND(SNACE) 

COPYCR(SNACE , OUTPUT) 

\ 

(COMPASS source deck) 

\ 

(Binary of previously assembled program) 

7, 



8 



9 



6. 
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the job. 



Normal execution with labeled dump if job aborts- 
job card 

DEBUG. DEBUG card remains iibforce throughout 

COPYBRtfNPUT, LGO) 
COMPASS. 
LGO. 
EXIT. 
DMP(6000) 
DMP(PA, PA) 

V 



Dumps locations occupied by program PA. 
PA must have been loaded for this card to be 
accepted. 



(Binary of previously assembled program) 

\ 

(COMPASS source decks including program called PA) 

7„ 



8 



9 



If COMPASS terminates abnormally, the labeled dump produces labels 
reflecting programs loaded for COPYBE. COMPASS, a library overlay, 
has no loader tables to update the DEBUG file. 
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SNAP run with labeled and change dump 
job card 
DEBUG(C) 
SNAP(params) 
INPUT. 

DMP(1000,2000) 
REWIND(SNACE) 
COPYCF(SNACE, OUTPUT) 
EXIT. 
DMP(5000) 
REWIND(SNACE) 
COPYCF(SNACE , OUTPUT) 

Y 



DEBUG card must appear before the SNAP card. 

SNAP cards apply only to next load; they must 
appear immediately before the card initiating 
that load. (SNAP and TEACE cards do not 
signal the end of the current load.) 



(Binary decks to execute) 

7, 



8 



9 
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Overlay run using both SNAP and labeled dumps: 
job card 
DEBUG. 
DEBUG(S) 

LOAD(FILE) 

NOGO. 

SNAP(params) 

OVFILE. 

DMP(IOOO) 

REWIND(SNACE) 

COPYCF(SNACE, OUTPUT) 

EXIT. 

DMP(IOOOO) 

REWIND(SNACE) 

COPYCF(SNACE, OUTPUT) 

\ 
\ 

FILE contains overlay directives and binary decks which comprise the overlays 
to be written on file OVFILE when LOAD(FILE) is processed. Once execution 
of the overlay file begins, dumps will be labeled because of the DEBUG card. 
The following rules apply: 

The DEBUG(S) card must precede the LOAD(FILE) cards so that the 
loader tables will be placed on the overlay file as it is generated and 
so that in (0,0) overlay the debugging routines will be loaded. 

The NOGO card must appear; otherwise, the SNAP routine is loaded in 
the last overlay. 

The SNAP cards must appear just before the card which initiates loading 
of the (0,0) overlay. 
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Segment run using both TRACE and labeled dumps: 
job card 



DEBUG. 

DEBUG(T) 

TRACE(params) 

INPUT. 

DMP(40000) 

REWIND(SNACE) 

COPYCF(SNACE, OUTPUT) 

\ 

(Segmentation loader directive cards) 
(Binary decks) 

\ 



The DEBUG cards must appear before any 
TRACE or SNAP cards; TRACE and SNAP 
cards must appear immediately before the 
load to which they apply. 
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SNAP run with SNACE output going to tape; 
tape to be listed at a later time: 

job card 

BEQUEST SNACE. 

REWIND(SNACE) 

SNAP(params) 

INPUT. 

COPYBF(X, SNACE) 

EXIT. 

COPYBF(X, SNACE) 

V 



The COPYBF(X, SNACE) cards write an end- 
of-file on the tape. Normally, this is a faster 
method of running SNAP and TRACE when 
output to SNACE is extensive . 



object deck 

6 V 



job card 

REQUEST SNACE. 
REWIND( SNACE) 
COPYCF(SNACE, OUTPUT) 



8 



9 
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CUSTOMER ENGINEERING (CE) DIAGNOSTICS 



12 



12.1 

MODES OF 
OPERATION 



Customer Engineering (CE) diagnostic programs available under SCOPE 3 
consist of: 

Four CPU tests (ALS, CT3, CU1, and FST) 

Two central memory tests (CM6 and MY1) 

Six peripheral equipment tests (CP1, CR1, DT2, LPT, LP1, and MTT) 

One ECS test (EC2) 

The System Maintenance Monitor (SMM) tape contains equivalent tests with 
the same mnemonics. SMM is the system used by customer engineers to 
run diagnostic programs during preventive maintenance periods. These 
tests are fully described in the System Maintenance Monitor Reference Manual 
(Pub. No. 60160600). 



The CPU tests and memory tests (except EC2) can be run in both SMM and 
SCOPE modes. The peripheral equipment tests and memory test EC2 can 
be run only in SMM mode. 



SMM Mode 

Executing a test under SCOPE in SMM mode is like executing under SMM, 
except that the test has been modified slightly to interface with SCOPE. 

For CPU programs, the ORG card was changed from ORG 1 to ORG 101B. 
Therefore, a SCOPE listing of a test will be 100 g locations higher than a 
listing from the SMM tape. 

For PPU programs, a call to the common deck PSSYS was substituted in 
place of a call to the common deck PS. PSSYS enables a PPU program to 
interface with SCOPE; PS allows interface with SMM. 
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A CE test is called to execute in SMM mode by specifying the test mnemonic 
under DIS or with a program call card in a control card deck, for example : 



/ALS. 



SCOPE Mode 

SCOPE mode was developed primarily to allow CE diagnostics to be run 
under the Automatic Program Sequencer (APR). Sample jobs appear in 
section 12.4. 

A CE test is called to execute in SCOPE mode by specifying the test 
mnemonic followed by (SEQ) . This call may be made under DIS or with a 
program call card in a control card deck, for example: 



/ALS (SEQ) 



SCOPE Mode and SMM Mode Differences 

The modes of execution differ in three respects only: 

SCOPE Mode SMM Mode 



Execution Time 



Dayfile Messages 



Random Number 
Requests 



Tests execute for a 
finite length of time 
(usually 10-15 sec- 
onds) and then end. 

Tests send error 
message to dayfile 
and pauses for 
operator action if a 
hardware malfunction 
is detected. 

ALS, FST, and CT3 
tests make calls to 
the Automatic Pro- 
gram Sequencer 
(APR) for a random 
number to be used 
as a starter for a 
random instruction 
generator. 



Tests execute until a 
time limit abort or an 
operator DROP occurs 
at the control point. 

Tests merely halt the 
central processor on a 
program stop instruc- 
tion when a hardware 
error is discovered 

No random number 
requests are made. 
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12.2 

CPU AND 

MEMORY TESTS 



The following test descriptions summarize the purpose of each test, and 
the accompanying chart gives the test calls, field lengths required, execution 
times, and error messages. More detailed descriptions are in the System 
Maintenance Monitor Reference Manual (Pub. No. 60160600). 

The CPU and memory tests were added to SCOPE primarily for use with the 
Automatic Program Sequencer (APR) . The CM error dumps shown in the 
chart refer to usage with APR. 

Each test assumes that when it is called in SCOPE mode, the program call is 
part of a JOB card deck. When the test aborts after an error is detected, it 
assumes that the deck contains an EXIT card followed by DMP cards to dump 
the field length of the job. 

The four CPU tests also assume that MODE,0. cards appear in the job deck. 
These cards are necessary to suppress the hardware exit mode, because the 
CPU tests use illegal operands to check for hardware end cases. 



ALS - 6X00 Random Instruction Test 

ALS generates random instructions. It tests the stack registers and the 
Scoreboard's ability to handle instructions issued at a rate faster than 
possible when instructions are not issued from the stack. 

Errors are detected by executing an instruction sequence twice with the same 
initial register contents. The first pass terminates with a 04 jump instruction 
back to the beginning to re -execute all instructions from within the stack. 
The second pass terminates with a 02 jump instruction back to the beginning 
to prevent instructions from being executed from the stack registers. The 
answers are compared and an error message occurs if they do not agree. 

ALS is intended for the 6600 computer. The 6400 computer can run the test 
but cannot execute an in-stack instruction loop. 
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Program 



Test Call 
SMM Mode SCOPE Mode 



ALS 



FST 



CT3 



cm 



ALS. 



FST. 



CT3. 



ALS(SEQ) 



FST(SEQ) 



CT3(SEQ) 



Field Length Req. 
(Octal Locations) 



1500 



1200 



Execution Time 
SMM Mode SCOPE Mode 



Indefinite 



4000o passes thru its 
instruction loop (20 g 
seconds on the 6400) 



Indefinite 



4100 



CM6 



MY1 



EC2 



CU1. 



CUl(SEQ) 



CM6. 



MY1. 



CM6(SEQ) 



MYl(SEQ) 



7000 



Any value greater 
than 10,000. 



Indefinite 



Indefinite 



5000 g passes thru its 
instruction loop (20 g 
seconds on the 6400) 



Error Messages (SCOPE Mode)* 



SEQUENCER DIAGNOSTIC/ALS/FAILED. 

PASS CNT. = XXXXXX 

RDN. NO. = YYYY 
TYPE n.GO. SEE LINE PRINTER FOR 
CM ERROR DUMP. 



4000g passes thru its 
instruction loop (20 g 
seconds on the 6400) 



One pass thru its 
instruction loop (40g 
seconds on the 6400) 



Indefinite 



Any value greater 
than 1000. 



EC2. 



55,000. 



Indefinite 



40,000o passes; each checks 
100g pairs of addresses in 
each memory bank. Requires 
15 g seconds on the 6400 with 
field length 2 20,000. 
Smaller field length increases 
execution time. 



SEQUENCER DIAGNOSTIC/FST/FAILED. 

PASS CNT. = XXXXXX 

RDN. NO. = YYYY 
TYPE n.GO. SEE LINE PRINTER FOR 
CM ERROR DUMP. 



SEQUENCER DIAGNOSTIC/CT3/FAILED. 
ERROR PASS XXXXXX. 
TYPE n.GO. SEE LINE PRINTER FOR 
CM ERROR DUMP. 



None. 



SEQUENCER DIAGNOSTIC/CM6/FAILED. 
ERROR ADDRESS IN LOC. 342 
ERROR DATA IN LOC. 343 

TYPE n.GO. SEE LINE PRINTER FOR 
CM ERROR DUMP. 



10g passes thru its instruc- 
tion loop (10g seconds on a 
6400 with a field length of 
30000.). 



20 g seconds for a 500,000 
word ECS field length. 



SEQUENCER DIAGNOSTIC/MY1/F AILED. 
TYPE n.GO. SEE LINE PRINTER FOR 
ERROR DUMP. 



SEQUENCER DIAGNOSTIC/EC2/FAILED. 
TYPE n.GO. SEE LINE PRINTER FOR 
ERROR OUTPUT. 



o 
t-' 

00 
CD 

*> 

o 
o 

te 

< 



t To call attention to the error, the final message remains at the control point and the job goes into recall until the operator types n. GO. 



W 



FST - 6X00 Random Instruction Test 

FST generates a set of 10 g random numbers, removes all jump instructions 
from this set and runs it as a subroutine. Passes are inserted in the last 
parcel in place of 30 -bit instructions. All writes and reads are restricted to 
specific areas. 

To check results, a slow loop is also generated with the same instructions; 
but it contains only one instruction for every two words of passes. 

The B and X registers are loaded with random numbers and the A registers 
are set to known values before each pass. The slow loop is run first, and 
the results of the registers are stored, then the fast loop is run and the re- 
sults compared. If the results compare, the fast loop is run and compared 
31 more times. If no error occurs, the fast loop is run and compared 32 
times for each set of random numbers before a new set is generated. 

When an error occurs, the loops are shortened by one 60-bit word and the 
test rerun. If it fails again the loops are shortened again and the test is 
rerun until it does not fail. At this point, the last word removed is replaced; 
the pass count is entered in the dayfile, and the program halts. 



CT3 - 6X00 Random Instruction Test 

CT3 uses a central processor simulator routine. It generates a set of random 
instructions and forms a random instruction loop. Branch and memory ref- 
erence instructions are restricted to specific areas. The random loop is 
executed and the result registers saved. The simulator routine is then used 
to execute the random instruction loop, and the result registers are compared 
for differences. 

The CT3 optional parameters described in the System Maintenance Monitor 
Reference Manual are not selectable in the SCOPE version of CT3. These 
parameters are automatically set for: 

Central simulator 

Six words in random loop 

No stop on error 

In-stack processing 

No optimization 

Try each set of random instructions twice 
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CU1 - 6X00 Command Test 

CU1 tests central processor control hardware, central processor functional 
units, etc. Test of the control hardware checks the read flag settings and the 
unit reservations. Tests of the functional unit hardware check the arithmetic 
operations performed in the functional unit for a number of fixed operands. 

CU1 needs a basic field length of 5200 8 ; however, the last section of the test 
is for the branch unit and utilizes all available field length assigned to the 
control point. 

CM6 - 6X00 Central Memory Test 

CM6 checks the capability of a memory stack to switch drive lines between 
two addresses in the same memory bank. The first address is read many 
times in an in-stack instruction loop; then the read is executed immediately 
on the second address which contains all ones. 

The test is more effective on the 6600 computer, as the 6400 computer cannot 
drive memory as fast because it cannot execute an in-stack loop. 

Test results are not as meaningful if a storage move occurs while the test is 
executing. 



MY1 - 6X00 Central Memory Test 

MY1 checks central memory by setting each location in the field length to its 
relative address; it then executes five reads for each location. The data read 
back is held in XI through X5 and is matched against X0, the current test 
address. The test accumulates and holds all error bits in X7, stores the 
error accumulations into memory, and rereads to check for zero. It also 
checks X7 for zero prior to storing. 

At the end of one sweep of memory, the test will use the complement of the 
relative address and then repeat the check. 

The test results are not as meaningful if a storage move occurs while the 
test is executing. 



EC2 - 663X Extended Core Storage Test 

EC2 tests ECS by writing data patterns to the assigned field length of ECS 
and then reading them back. A check is made for data differences. ECS 
field length can be set to any value; the program tests only that portion of 
ECS assigned to the control point. ECS is accessed in blocks of 10, 000 8 
words. 
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EC2 is written in FORTRAN Extended with a COMPASS subroutine. The test 
makes calls to the Automatic Program Sequencer (APR) . The following 
sense switches are used to indicate the number of ECS banks present in the 
system: 



Banks of ECS 


Sense Switches On 


1 


None 


2 


1 


4 


2 


8 


3 


16 


1, 2, and 3 



12.3 

PERIPHERAL 
EQUIPMENT TESTS 



The following descriptions are for tests that run in the PPU. They have 
only one mode of operation and are not intended to be run with the 
Automatic Program Sequencer (APR) for automatic job execution. These 
tests, however, can be used with APR with an execution frequency of 000. 
(See sample job 10.) 



These tests have the following optional sense switch settings: 



Sense Switches On 





MTT 


DT2 


LPT 


LP1 


CP1 


CR1 


Stop on Errors 


1 


1 


1 


1 


1 


1 


Stop at End of Section 


2 


2 


2 


2 


2 




Repeat Subcondition 


3 


3 


3 




5 & 6 




Repeat Test 


4 


4 


4 


4 


4 




Repeat Section 


5 


5 


5 


5 


5 




Repeat Condition 


6 


6 


6 


6 


6 




Stop at End of Test 








3 


3 




Stop After Next Title Card 












2 


Stop After Input Tray Empty 












3 


Restart Test After Input Tray Empty 












4 


Repeat Last I/O Operation 












6 



60189400 Rev. K 



12-7 



MTT - 60X Magnetic Tape Test 

MTT checks the 60X tape unit, a 3000 series tape controller, 6681 channel 
converter, and 6000 series data channel. Two calls may be used. 

MTT. 

All sections of the: test are run on the first channel found in the equipment 
status table entry for the assigned tape unit. 

MTT(cc,xxxxxx) 

cc designates channel and xxxxxx are octal numbers; each bit represents 
a section of the test. If channel is entered, xxxxxx must be specified. 

Examples: 

MTT(13, 000001) Run section 1 only; tape is on channel 13 
MTT(000001) Run section 1 only; use first channel in EST 

MTT(000277) Run sections 1 through 6 and 8 

After test execution begins, the following messages appear at the control 
point: 

Message Operator Action 

REQUEST MT. Assign device type MT to the control point. 

SET PARAMS. Set sense switches for desired conditions. 

ASSIGN EXTRA If desired, assign additional units to be tested. 

UNITS To begin testing, enter n.GO on the keyboard. 

Subsequent error messages at the control point are described in the Systems 
Maintenance Monitor Reference Manual. The operator enters n.GO to con- 
tinue the test after an error stop. 



DT2 - 6638 Disk File Test 

This test can be run only on a non-system disk; no other device on the same 
channel as the disk can be accessed while DT2 is executing. DT2 can be 
called by control cards or manually under DIS by its mnemonic DT2: 



12-8 



60189400 Rev. K 



DT2(n) where n may have one of the following values: 

1 = Run section 1 

2 = Run section 2 
4 = Run section 3 

10 = Programmable read/write section 

After test execution begins, the following messages appear at the control 
point: 



Message 



Operator Action 



REQUEST xx. Assign device type xx to the control point. 

A 3000 entry for hardware type xx must have 
been entered already in the Equipment Status 
Table. 



SET PARAMS. Set sense switches for desired conditions. 

To begin testing, enter n.GO on keyboard. 

Subsequent error messages at the control point are described in the Systems 
Maintenance Monitor Reference Manual. The operator enters n.GO to con- 
tinue the test after an error stop. 



LPT - 501 Line Printer Test 

LPT checks the 501 line printer, 3659 or 3256 controller, 6681 channel 
converter, and 6000 series data channel. LPT has two alternate calls: 

LPT. 

Run all sections of the test. 

LPT(xxxxxx) 

xxxxxx are octal numbers; each bit represents a section of the test. 

Examples: 

LPT(000001) Run section 1 only. 

LPT(000277) Run sections 1 thru 6 and 8 
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After test execution begins, the following messages appear at the control 
point: 



Message 

REQUEST LP. 
SET PARAMS. 



Operator Action 

Assign device type LP to the control point. 

Set sense switches for desired conditions. To 
begin testing, enter n.GO on the keyboard. 



Subsequent error messages at the control point are described in the Systems 
Maintenance Monitor Reference Manual. The operator enters n.GO to 
continue the test after an error stop. 



LP1 - 512 Line Printer Test 

LP1 tests the 512 line printer, 3555 controller, 6681 channel converter, and 
6000 series data channel. The test is called by its mnemonic LP1. If 
parameters are to be changed, enter: 



LPl(xxxx,yyyy) 

xxxx are octal numbers with the following bit values : 

8 7 6 5 



11 10 9 8 

Train type: 
or 1 = 63 character 

2 = 48 AN char. 

3 = 48 HN char. 

No. lines per inch of 

format tape : 

1 = 6 lines = 8 lines 



4 





Select 
Sec. 14 



Select 
Sec. 15 



Select 
Sec. 16 



Select 
Sec. 17 



Select 
Sec. 20 

yyyy are octal numbers with the following bit values: 

ybits: 11 10 9 876543 2 10 

select sections: 13 12 11 10 7 6 5 4 3 2 1 
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Examples : 



LP1 (4001 ,0002) 
LP1 (0004, 0030) 
LP1 (2000, 7776) 
LP1. 



Selects 6 lines and sections 14 and 1. 
Selects sections 3,4, and 16. 
Selects 48 AN character and sections 1-13. 
Selects all sections. 



After test execution begins, the following messages appear at the control 
point: 

Message Operator Action 

REQUEST LQ. Assign device type LQ to the control point. 

SET PARAMS. Set sense switches for desired conditions. To 

begin testing, enter n. GO on the keyboard. 

Subsequent error messages at the control point are described in the Systems 
Maintenance Monitor Reference Manual. The operator enters n.GO to 
continue the test after! an error stop. 



CP1 - 415 Card Punch) Test 

CP1 tests the 415 carcj punch, 3446 or 3644 controller, 6681 channel con- 
verter, and 6000 series data channel. The test is called by its mnemonic 
CP1. If parameters a^re to be changed, enter: 

CPl(xxxx) 

xxxx are octal numbers with the following bit values: 

xbits: 11 10 9876543210 

select sections: 10 987654321 



Examples : 



CP1(0002) 
C PI (0306) 
CP1. 



Selects section 1. 

Selects sections 1, 2, 6, and 7. 

Selects all sections. 
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After test execution begins, the following messages appear at the control 

point: 

Message Operator Action 

REQUEST CP. Assign device type CP to the control point. 

SET PARAMS. Set sense switches for desired conditions. To 

begin testing, enter n. GO on the keyboard. 

Subsequent error messages at the control point are described in the Systems 
Maintenance Monitor Reference Manual. The operator enters n.GO to con- 
tinue the test after an error stop. 



CR1 - 405 Card Reader Test 

CR1 tests the 405 card reader, 3649 or 3447 controller, 6681 channel con- 
verter, and 6000 series data channel. The test is called by its mnemonic 
CR1. No section select parameters are used because all cards in the card 
reader are checked regardless of order. The card deck punched by CP1 
should be put into the card reader assigned to the test. 

After test execution begins, the following messages appear at the control 
point: 

Message Operator Action 

REQUEST CR. Assign device type CR to the control point. 

SET PARAMS. Set sense switches for desired conditions. To 

begin testing, enter n.GO on the keyboard. 

Subsequent error messages at the control point are described in the Systems 
Maintenance Monitor Reference Manual. The operator enters n.GO to 
continue the test after an error stop. 



12.4 

SAMPLE JOBS The call APR(7,xxxxnn) shown in the sample jobs is not described in 

section 10. 8 (APR) because it refers only to diagnostic programs. 

7 is a directive to APR to set the diagnostic flag bits. 

nn is the job number. 

xxxx is a set of flag bits, one bit for each CPU diagnostic program in 

the CE test. Bit values for xxxx are: 
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12.4.1 

SAMPLE JOB 1 



12.4.2 
SAMPLE JOB 2 



Value of xxxx 


Diagnostic 


0001 


CT3 


0002 


MY1 


0004 


CM6 


0010 


CU1 


0020 


ALS 


0040 


FST 


0100 


EC2 



For example, to set CT3, MY1, and CM6: xxxx = 0007. 
To set CT3 and FST: xxxx = 0041. 

These bits are set in the sequencer table in CMR but do not affect the 
operation of the sequencer. The bits are used when the keyboard entry 
SEQ.LIST.nn. is made. This entry causes the names of the diagnostics 
assigned to job nn to be listed in the dayfile for reference. 



Execute the diagnostic ALS every 10 Q minutes 
MAINT, P17, T20, CM1500. 

APR(1, 001001) 



ALS field length = 1500. 
Time = 20 seconds. 



MODE.0. 
ALS(SEQ) 
6/7/8/9 



Saves job as sequencer job 1 to be 
executed every 10 minutes. 

ALS uses the illegal operands. 

Calls sequencer version of ALS. 



Save and execute ALS every 10 minutes; set up the diagnostic flag bit for ALS. 



MAINT, P17, T20, CM1500. 
APR(1, 001001) 
MODE.0. 



See sample job 1. 
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12.4.3 

SAMPLE JOB 3 



12.4.4 

SAMPLE JOB 4 



APR(7, 002001) 
ALS(SEQ) 

6/7/8/9 



Diagnostic in sequencer job 1 is ALS. 

See sample job 1. 

After job is completed, console entry: 

SEQ,UST,01. will produce dayfile 
message: 

DIAG.SEQ. JOB 01 CONTAINS ALS 



Save and execute ALS every 10 minutes. If ALS fails, dump the field length. 



MAINT,P17,T20,CM1500. 
APR(1, 001001) 

MODE.0. 
ALS(SEQ) 
EXIT. 

DMP.1500. 



6/7/8/9 



See sample job 1. 

Save job, same as sample 1; executed 
if ALS does not fail. 

See sample job 1. 

See sample job 1. 

If ALS did not fail, EXIT ends job. 
Otherwise, cards after EXIT will be 
executed. 

Gets failure data by dumping actual field 
length of ALS. Since ALS failed, it 
aborts to EXIT and system provided 
exchange jump package. 



Save and execute ALS every 10 minutes. Set the flag bit for ALS. If ALS 
fails , dump the field length. 

MAINT,P17,T20,CM1500. 

APR(1, 001001) 

MODE.0. See sample job 3. 

APR(7, 002001) Sets flag bit for ALS. After job comple- 

tion, console entry SEQ,LIST,01. will 
produce dayfile message: 

DIAG.SEQ. JOB 01 CONTAINS ALS 
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ALS(SEQ) 

EXIT. 

DMP.1500. 

6/7/8/9 



See sample job 3 . 



12.4.5 

SAMPLE JOB 5 



Same as sample job 4, except suppress the output If ALS executes successfully. 
MAINT, P17, T20, CM1500. 



APR(1, 001001) 
MODE.0. 
APR (7, 002001) 
ALS(SEQ) 
APR (11, 01) 

EXIT. 

DMP.1500. 

6/7/8/9 



See sample job 4. 



Suppresses output, separators, and 
dayfile of job MAINT. 

See sample job 4. 



12.4.6 

SAMPLE JOB 6 



Run ALS and CT3 every 10 minutes as sequencer job 3. Set flag bits for ALS 
and CT3. Suppress output file and dump field length of failing diagnostic. 



CHEK, P17, T40, CM5000. 



APR(1, 001003) 



MODE,0. 

A PR (7, 002103) 



ALS(SEQ) 
CT3(SEQ) 



Time limit = 40 (20 seconds for each 
diagnostic) ; field length = 5000 (for 
largest diagnostic, CT3). 

Saves CHEK as sequencer job 3; runs 
every 10 minutes. 

See sample job 1. 

Sets flag bits: ALS(0020) + CT3(0001) = 
0021. 



Calls sequencer version of ALS and CT3. 
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APR(11,03) Suppresses output. 

EXIT. See sample job 3. 

DMP.4000. Dumps field length (CT3 = 5000). If 

ALS fails, CT3 will not be executed. 

6/7/8/9 

EC2 Jobs 

Because EC2 is unique, three sample EC2 jobs are shown. EC2 should 
be run alone. The time limit is 30 seconds, and 55,000 words are needed 
for central memory field length. ECS field length is specified on the JOB 
card in I000 g -word blocks; EC50 = 50,000 words of ECS. The SWITCH cards 
specify the total number of ECS banks, as follows: 

No SWITCH card = 1 bank 

SWITCH1 card = 2 banks 

SWITCH2 card = 4 banks 

SWITCH3 card = 8 banks 

SWITCH1 \ 

SWITCH2 > cards = 16 banks 

SWITCH3 ) 

SWITCH cards do not specify which banks of ECS to test; they merely indicate 
the number of banks in the ECS unit. 

The SWITCHn card turns on pseudo sense switch n at the control point. 



12.4.7 

SAMPLE JOB 7 Use EC2 to test a 1-bank ECS system. Check an ECS field length of 50,000. 

Run EC2 as sequencer job 7 every 30 minutes. 

CHEKECS,P17,T30,CM55000,EC50. EC50 requests 50,000 words of ECS. 

APR(1, 003007) Saves CHEKECS as sequencer job 7 to 

be run every 30 minutes. 

APR(7, 010007) Sets EC2 flag bit. 

EC2. 

APR(11,07) Suppresses output file on successful 

execution. 

6/7/8/9 EXIT and DMP cards not needed because 

EC2 has an error printout routine. The 
absence of a SWITCH card indicates only 
one bank of ECS is present. 
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12.4.8 

SAMPLE JOB 8 



Use EC2 to test a 2-bank ECS system. Check an ECS field length of 100,000. 
Run EC2 as sequencer job 7 every 30 minutes. 

CHECECS,P17,T30,CM55000,EC100. Requests 100,000 words of ECS. 

SWITCH1. Two banks of ECS present. 

APR(1, 003007) 

APR(7, 010007) 

EC2. 

APR (11, 07) 

6/7/8/9 



See sample job 7 



12.4.9 

SAMPLE JOB 9 



Use EC2 to test a 16-bank ECS system. Check an ECS field length of 250, 000. 
Run EC2 as sequencer job 7 every 30 minutes. 

CHECECS, P17, T30, CM55000, EC250. EC250 requests 250, 000 words of ECS. 

SWITCH1. 

SWITCH2. \ 16 banks of ECS present. 

SWITCH3. 

APR(1, 003007) 

APR{7, 010007) 

EC2. 

APR(11,07) 

6/7/8/9 



See sample job 7 



12.4.10 

SAMPLE JOB 10 



A peripheral test is placed under the sequencer with an interval of 0000. 
The test will not run unless a SEQ.RUN.nn. entry is made. 



MAINT, P17,T1000,CM1000. 
APR(1, 000001) 



When MAINT is loaded, MTT will 
request a tape. Enter n. DROP on 
keyboard. MAINT will be saved as 
sequencer job 1, interval 0000. 



60189400 Rev. K 



12-17 



MTT. 

6/7/8/9 



Zero interval jobs are not run 
unless called. To run MTT, enter 
SEQ, RUN, 01. MTT will be loaded. 
Proceed as under SMM. When 
completed, DROP control point. 
MAINT will be saved again under 
the sequencer. 



Placing peripheral tests under the 
sequencer in this manner eliminates 
the need to use DE3. to call a 
peripheral test. 



12.5 

SYSTEM 
ENGINEERING 
FILE DESCRIPTION 



The System Engineering File records system hardware malfunctions detected 
by the SCOPE Operating System. Errors are recorded through entries from 
I/O drivers, and PP/CP program. The entry format, file construction and 
file maintenance are designed to facilitate utilization in current programs as 
well as future design efforts. 

The file is dynamic from deadstart time; its FNT and FET entries are 
assembled in CMR. If a program detects a hardware malfunction, it makes 
an entry in the file by using one of the formats described in 12. 5. 1. 

When calls are made to log an entry, the entry is placed in the engineering 
file buffer in CMR. The dayfile processing routine supplements the entry 
with time of day and jobname. The dayfile processing routines perform 
buffer maintenance and dump the contents to disk as necessary. An entry 
count is maintained (byte C.HEC of P.HEC in CMR). 

An Analyzer (CEFAP) program examines the engineering file, collects the 
statistical data, and outputs the results in usable form for examination by 
Customer Engineering. 



12.5.1 

ERROR, LOGGING 
PROCEDURE 



Programs log anomalies in the System Engineering File similarly to logging 
messages in the DAYFILE. 



Entries by PP Programs 

Entries made by PP programs are placed in the PP message buffer. 
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A call is placed through R.MTR in the PP output register as follows: 



0001 



0020 



lwa 




0001 Process dayfile message 

0020 Flag bit for DSD 
lwa LWA of entry 



Entries by CP Programs 

Entries made by CP programs are constructed within their field length. A 
call to MSG is placed in RA+1 with the address of the message and a flag 
(bits 18-23 = 02) to MSG which indicates the message is to be entered in the 
engineering file. MSG assumes a six bit CM word message. 



59 53 



47 




29 



23 



11 




Type 1 SCOPE System Tape I/O Driver 



a Error type 

b Error description 

c Program name 

d PPU number 

e Connect code 

f Channel number 

g Channel status 

h Equip status 

i Channel function code 

j Equip function code 



000001 base 2 

See error descriptions 

PPU program making entry 

PPU number of logging program 

Connect code of failing device 

I/O channel in use 

Last 6681 status returned 

Last Equip status returned 

Last 6681 code issued 

Last Equipment function code issued 



59 


53 


47 






29 


23 




11 







a 


b 


c 


d 


e 


w 




M 


f 


g 


h 


i 


j 


k 


1 


HP 


m 


n 
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Type 1 SCOPE System Mass Storage I/O Driver 



a 


Error type 


000001 base 2 


b 


Error description 


See error descriptions 


c 


Program name 


PPU program making entry 


d 


PPU number 


PPU number of logging program 


e 


Address of error 


Not supplied 


f 


Logical unit number 


EST number of failing device 


R 


Channel number 


I/O channel in use 


h 


Channel status 


Not supplied 


i 


Equip status 


Not supplied 


J 


Channel function code 


Not supplied 


k 


Equip function code 


Not supplied 


1 


Retry count 


Number of attempts to perform an 
operation 


m 


Last position 


Actual position of disk upon failure 


n 


Current position 


Not supplied 



Type 2 SCOPE System PPU Programs (non-l/O) 
59 47 29 23 



11 



a 


b 


c 


d 


e 


f 


f 


f 


f 


f 


f 


f 


f 


f 


f 



a Error code (0200 base 8) 

b Program name 

c PPU number 

d Address of error 

e Not used 

f Display coded message 
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Type 3 SCOPE System CPU Program 
59 47 35 



23 



17 



11 



a 


b 


b 


b 


b 


HP 
mm, 


§§§||§§§|i 


HH 


WKM 


mm, 


c 


c 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 


d 



a Error code 

b Program name, 7-characters 

c Address of error 

d Display coded message 

Type 4 C E Diagnostic PPU I/O Test (Not currently used) 

59 47 29 23 



11 



a 


b 


c 


d 


e 


f 


g 


h 


i 


J 


k 


1 


urn 


m 


m 


n 


n 





P 


P 


P 


P 



a 


Error code 


J 


b 


Program name 


k 


c 


PPU number 


1 


d 


Address of error 


ir 


e 


Not used 


n 


f 


Logical unit number 





g 


Channel number 




h 


Channel status 


P 


i 


Equipment status 





Channel function code 

Equipment function code 

Retry count 

Last position 

Current position 

Operation code , last logical 

operation 

Data, error data 
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Type 5 C E Diagnostic Non-l/O PPU Test (Not currently used) 
59 47 29 23 11 



a 


b 


c 


d 


e 


f 


f 


f 


f 


f 


f 


f 


f 


f 


f 



a Error code 

b Program name 

c PPU number 

d Address of error 

e Not used 

f Display coded message 

Type 6 C E Diagnostic CPU Program 



59 


47 








29 




11 







a 


b 


c 


d 


e 


e 


e 


e 




e 




f 


f 


f 


f 


f 


f 


f 


f 


f 




f 




f 


f 


f 


f 


f 


' 


f 


f 


f 


f 



a Error code 

b Program name 

c Address of error 

d Pass count 

e Base random number 

f Display coded message 
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Type 7 Remote Terminal (RESPOND, SENTRY, EXPORT/IMPORT, IOD) 
Programs 



59 




47 




35 




23 




11 







a 


b 


c 


d 


e 


f 


g 


h 


i 


J 



a 


Error code 


b 


Line number 


c 


LRB 


d 


RBB 


e 


WBB 


f 


LSB 


f? 


TSB 


h 


RSB 


i 


PNB 


J 


PLB 



0700 base 8 
TTY line number 
Line request byte 
Read buffer byte 
Write buffer byte 
Line status byte 
Terminal status byte 
Reply status byte 
Port Number byte 
Party line byte 



12.5.2 

ERROR CODES 



Type 8-11 not defined 



The following 12 -bit error code is the first byte of every entry: 



Error Description 
Format Type 

Not used 



2 11 








2° 


xxc 


ccc 


ddd 


ddd 






~r 



















xx Not used 

c Format type used in entry 

d Error description of type error 



Error Code Definitions 



2 10 , 2 U 



Not used 

Format types as follows: 



00 


not used 


01 


Type 1 


02 


Type 2 


03 


Type 3 


04 


Type 4 


05 


Type 5 



System I/O driver 

System PPU program non-I/O 

System CPU program 

C E Diagnostic PPU I/O test 

C E Diagnostic Non-I/O PPU test 
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06 Type 6 C E Diagnostic CPU Program 

07 Type 7 Control Message (RESPOND or EXPORT/ 

IMPORT) 

10 not used 

11 not used 

12 not used 

13 not used 

14 not used 

15 not used 

16 not used 

17 not used 

5 
2-2 Error Descriptions for Format Type 1 

00 not used 

01 Channel active, should be inactive 

02 Channel inactive, should be active 

03 Channel full, should not be 

04 Channel empty, should not be 

05 Non-zero accumulator upon exit from an OAM 
instruction (lost data suspected) 

06 Memory parity error during loading MMTC 

07 Memory parity error during data flow in MMTC 

10 Read parity error 

11 Write parity error 

12 Function reject 

13 XMSN parity error 

14 Compare error 

15 Fail to feed 

16 Lost data 

17 RMS address error 

20 RMS checkword error 

21 Print error 
22-27 not used 

Error descriptions for Format types 2-11 are not defined. 

12.6 

SYSTEM 

ENGINEERING 

FILE ANALYZER 

(CEFAP) CEFAP formats and prints raw data in the System Engineering File. The 

main program CEFAP is written in FORTRAN. A COMPASS PPU routine 
IEF performs utility functions for CEFAP. CEFAP is edited into the system 
library. CEFAP may then be called by job deck or console command under 
DIS. Once activated, CEFAP attaches the System Engineering File to its con- 
trol point and reads the file and generates output. Output consists, basically, 
of a list of everything in the engineering file plus statistical tables plotting 
common error data against time. Also, a parameter may be entered on the 
CEFAP call to specify output sorting. 
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12.6.1 

PARAMETERS Thxee parameters may be entered on the CEFAP call in the order shown 

below; 

CEFAP (pi, p2, p3) 

S or SORT CEFAP sorts data in the output list according to 
error type, PPU number, channel number, and 
equipment EST ordinal. 

P or PURGE CEFAP.clears the error count in central memory 
and purges the engineering file after analysis. A 
new engineering file will be created by the system. 

E or EXPAND CEFAP prints every error entry in chronological 
order. Normally, repeated errors will be printed 
once with an indication as to how many times it 
occurred. 

If CEFAP is dropped from a control point before normal comple- 
tion after assigning the L display, a subsequent CEFAP run may 
give false or erroneous output. 

12.6.2 

INSTALLATION The CEFAP FORTRAN deck and COMPASS PPU deck both reside on the 

PL7 tape. CEFAP may be added to SCOPE with the following job deck: 



Card No. 


Content 


1 


Job Card (CM50000) 


2 


REQUEST OLDPL. ASSIGN PL7 


3 


UPDATE (Q) 


4 


COMPASS(I=COMPILE, S=SCPTEXT, R=IEF) 


5 


RUN(S, , , COMPILE, , , 100000) 


6 


LOAD(LGO) 


7 


NOGO 


8 


REWIND(CEFAP) 


9 


REWIND(LEF) 


10 


EDITLIB. 


11 


EOR 


12 


*COMPILE, CEFAP, IEF. 


13 


EOR 


14 


READY(SYSTEM) 


15 


DELETE (CEFAP) 


16 


DELETE (LEF) 


17 


ADD(CEFAP, CEFAP) 


18 


ADD(IEF.IEF) 


19 


COMPLETE. 


20 


EOF 
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12.7 

IEF DESCRIPTION IEF is called by the System Engineering File Analyzer Program (CEFAP). 

Upon entrance to the program, the PPU input register has the following 

format: 

1105 06cc xxxx ffpp pppp 

cc Control point number 

ff Function code 

xxxx Function parameter (used only by function code 02) 

PPPPPP Relative address of replay register in CM 

IEF performs the following functions: 

Function Code 00 

1 . Copies date from CMR to PPPPPP+1 

2 . Copies EST from CMR to PPPPPP+2 

3. Dumps engineering file buffer (CERFILE) and creates a duplicate 
engineering file (FNT/FST local to control point 

4. Sets reply register (pppppp) to: 

0077 0000 aaaa 0000 1111 

0077 Function complete status 

aaaa Duplicate error file FNT address 

1111 Length of CERFILE buffer 

Function Code 01 Purge CERFILE 

Same as function code 00 except the FST for CERFILE is zeroed so that a 
new engineering file will be created by system. 

Function Code 02 

1 . Removes the duplicate engineering file FNT/FST entry created by a 
function code 00 call. The FNT/FST address is given by xxxx in 
input register. 

2. Sets reply register (pppppp) to: 
0077 0000 0000 0000 0Q00 

0077 Function complete status 
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12.8 

OPERATION If purge is not specified in the CEFAP call, IEF is called initially with func- 

tion 00; and after the run it is called again with a function 02. This procedure 
allows CEFAP to read the engineering file with the duplicate FST\ while the 
system continues to log anomalies. The function 02 call is necessary to pre- 
vent disk storage from being released at end of job; the System Engineering 
File remains intact. If purge is specified, IEF is called initially with function 
01. The system then terminates error logging on the original engineering 
file (blanked FST) and creates a new one. On end of run, CEFAP does not 
recall IEF; thus disk storage associated with the original engineering file is 
released by IE J at end of job; the error file is purged. 

IEF DAYFILE MESSAGES 

The starred messages denote conditions which cause IEF to abort at control 
point. 

*IEF — REPLAY REG ADDRESS OUT OF RANGE 

TKe pointer in the IEF call was beyond the control point FL. Call 
register bits 2 - 2 . 

*IEF ~ CERFILE NOT IN SYSTEM 

CERFILE FNT/FST not present in file name table. 

IEF — WAITING FOR FNT SPACE 

IEF is waiting for space in the file name table to place a duplicate 
CERFILE FNT. 

IEF — CERFILE PURGED 

Placed in DAYFILE when function 01 is in process. 
The CERFILE FST is cleared. 

*IEF — ILLEGAL FUNCTION CODE 

Function code field in call was not recognized by IEF. Call 
register bits 2 18 - 2 23 . 

*IEF — DUPLICATE CERFILE NOT PRESENT 

On function 02 call, a duplicate CERFILE FNT/FST was not found 
in file name table. 

*IEF — NOT CALLED BY AN ABSOLUTE LIBRARY PROGRAM 

On entry, IEF checks the control point area for a flag indicating 
the last program loaded was a system library program . 



60189400 Rev. L 12-27 < 



12.8.1 

EXECUTING CEFAP 



After running the job in section 12. 6. 2, CEFAP is ready for execution. 
CEFAP may be executed (called) in two ways: 



x.DHOP.cr 
x.XCEFAP. cr 
L=x. cr 
xxxxx.xcr 
GOcr 



x=Control point number 
x=Control point number 
x= Control point number 
xxxxx.x=site location number 



Parameters pi, p2, or p3 may not be entered directly under a control 
point entry. 7.XCEFAP(S) will not work as SCOPE does not recognize 
the parentheses. 

x.DIS.cr x=Control point number 

x.CEFAP(pl,p2,p3)cr 

* Depress asterisk KEY 

L=x. cr x=Control point number 

xxxxx. xcr xxxxx. x=site location number 

In addition to the on-line diagnostics, SCOPE 3.2 PL7 tape has CEFAP 
with correction identifiers CFAP001 and CFAP002. The EXPAND para- 
meter and the site location number features have been added via correction 
identifiers CFAP003 and CFAP004. 



EXAMPLE OUTPUT DEFINITIONS 



Line 1 

TIME=xx.xx.xx. 
JOB NAME=xxxxxxx 
PROG NAME=xxxxxxx 

CC=xxxx 
P=xxxxxx 

ER CODE=xxxx 
Message 



Error entry time. 

Name of job which had error. 

Name of program that issued error 
entry. 

Connect code of offending device. 

Program address on error (issuing 
program) . 

12-bit error code. 

Error message furnished in entry 
or determined by error code. 
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Line 2 



xxxx 

PPxx 
CHxx 
STAT C/E=xxxx/xxxx 

FUNC C/E=xxxx/xxxx 

RETRYS=xx 

RMS LP/CP=xxxxxxxx/xxxxxxx 



Equipment mnemonic and EST ordinal 
of offending equipment. 

PPU number driver is running in. 

Channel number. 

Last channel (6681) and equipment 
status. 

Last function issued to channel (6681) 
and equipment. 

Number of retrys before reporting 
error. 

Last position and current position of 
RMS device. 
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Flow Diagram of Error Logging 
CP Program PPU Program 



/ Anomaly \ 


< 


/ Anomaly \ 


\ Detected / \ Detected / 
















Format 


Format 




Entry in 


Message in 




PPU Message 


Field Length 




buffer 










' 


Call PP 




Place call 


Routine 




in PPU 


MSG 




output reg 










1 




Ml 


[■R 


Add time, 




job name 










Transmit 




Entry to 




CM buffer 










jS Is ^s. y 


Dump 


<^ buffer ^> *• 


buffer to 


^Xfull^/ 


disk 




N 










) 


f EXIT 



(12-30 



60189400 Rev. L 



PERMANENT FILES 13 



A permanent file is a mass storage file cataloged by the system so that its 
location and identification are always known to the system. Permanent files 
cannot be destroyed accidentally during normal system operation (including 
deadstart) and they are protected by the system from unauthorized access 
according to privacy controls specified when they are created (section 13. 2) . 

Any random or sequential file on a valid rotating mass storage device, which 
is not already permanent or common, can be made permanent at the option of 
the user regardless of mode or content. Unless the system is explicitly re- 
quested to catalog a file, it will not be made permanent. 

The following functions are available under the permanent file system: 

CATALOG an existing local mass-storage file, thereby making it a 
permanent file. 

ATTACH a previously cataloged file to a control point. 

EXTEND a currently attached file by making permanent an extension 
to it. 

PURGE a currently attached file from the directory of permanent 
files. 

These functions are available as control card commands and as run-time 
program calls (system macros). The CLOSE, UNLOAD macro or the 
RETURN control card allows a permanent file to be logically detached 
prior to end of job . 

13.1 

TERMS AND 

CONCEPTS DEFINED Terms and concepts used throughout this chapter are defined as follows: 

PERMANENT FILE 

A mass storage file (of any standard mode, content, length) locatable by the 
system via a search of the system -maintained Permanent File Directory, and 
protected from unauthorized access and from accidental destruction in any 
normal running environment of any version of SCOPE that supports perma- 
nent files. 
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CATALOG 

The function that enters a file's identification and location in the system- 
maintained Permanent File Directory. The CATALOG control card or 
system macro requests the system to catalog a file, thereby making it 
permanent. 



SUBDIRECTORY 

The directory of permanent files is divided into a number of subdirectories 
to expedite searching for files. Each permanent file has a subdirectory 
reference which the user may specify when requesting system action on 
that file. 



REWRITE 

Any action which modifies the content of an existing file including REWRITE, 
REWRITER, REWRITEF, or WRITIN macros. 



WRITE 

Enables normal writing at end-of -information of a file. When a permanent 
file is attached to a control point, any write function, except a rewrite, will 
cause data to be added at its end -of -information. Information added with 
write functions to an attached permanent file is considered temporary; it is 
released when the job is terminated unless EXTEND is used to make it a 
permanent extension. 



CYCLE 

Up to five files may be cataloged under one permanent file name and set of 
passwords; each is called a cycle. No restrictions are imposed on the con- 
tent or size of any of these cycles; each is a unique file. Each cycle is 
identified by the combination of permanent file name and cycle number. 
Cycle numbers from 1 to 63 10 are assigned by the creator of the file. 
Default value is 1 when cataloging. If cycle is not specified on the ATTACH 
card, it is assumed to be the largest cycle. 



ATTACH 

Causes a permanent file to be assigned to a control point. No user may 
access a permanent file until he attaches it to a control point, thereby 
establishing his right to read and/or write the file. 
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13.2 
PRIVACY 



13.2.1 

STANDARD PRIVACY 
PROCEDURE 



EXTEND 

Makes permanent an appendage to a file. Any write results in an extension 
to a file; however, an extension will not be reflected in the permanent file 
directory unless the user specifies that it be made permanent. EXTEND 
permission must have been granted by ATTACH before the user can write 
on the file. 



PURGING/RETENTION 

Purging causes a permanent file to be removed from the directory and its 
mass storage space to be released. Purging is done only when the file owner 
directs it, with the PURGE function. A retention period may be specified 
when a permanent file is cataloged, but the file will not be purged automati- 
cally when its expiration date is reached. An installation can obtain a listing 
of all expired files. Only one cycle at a time may be purged. 



MULTIPLE -READ ACCESS 



Any number of users may attach simultaneously a permanent file for read- 
only access. This is possible only if all passwords are defined at CATALOG 
time and only the read password is specified at ATTACH time. ATTACH 
requests are honored in the order submitted. 



The permanent file privacy feature is designed to prevent access to and 
alteration of permanent files by non-authorized central processor programs. 
However, it offers no protection against threats by operational personnel or 
hardware interference. This kind of threat is dependent on the installation 
environment. 

It is responsibility of the installation to ensure the integrity of the operating 
system at deadstart time and prevent any subsequent alteration. 



The permanent file system offers a standard set of privacy controls. If an 
installation requires a different kind of protection for one or more files, 
it can define a privacy procedure to replace the standard. 

The system automatically ensures that no normal operation will cause perma- 
nent mass storage files to be overwritten or otherwise destroyed, and that the 
directory of permanent files will not be destroyed. 
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In addition to normal system protection of permanent files, the individual 
file owner is given the means to prevent unauthorized access to his perma- 
nent file. He can stipulate, when he catalogs a file, the degree to which the 
file is to be protected from read, write, rewrite access. Once a file is 
cataloged, it cannot be used by any job unless the necessary passwords are 
given when a request is made to attach the file. 



13.2.2 

USER PRIVACY 
PROCEDURE 



Provision has been made for an installation privacy procedure to be substi- 
tuted for the system -provided privacy checking. This procedure must be a 
PP routine in the running system . An installation has ultimate control over 
the use of privacy procedures, since it may determine the content of its 
system, and controls the installation parameter, which when non-zero, 
allows use of privacy procedures. 

Privacy procedures are called at CATALOG time and at ATTACH time. 



13.2.3 

PASSWORDS AND 
PERMISSIONS 



When a file is cataloged, the file owner may specify up to five passwords to 
be associated with that file. Subsequent cycles assume the same passwords 
as the first cycle. Each password implies one type of access or permission 
allowed for use on subsequent ATTACH or new cycle CATALOG attempts. 
The passwords can by any string of 1-9 alphanumeric characters. 



When a permanent file is attached, READ (RD) permission is required to 
read the file. EXTEND (EX) permission is required to write at end-of- 
information. MODIFY (MD) permission allows the user to change the text 
on an existing permanent file with REWRITE. CONTROL (CN) permission 
is required to PURGE a cycle, or to catalog an additional cycle. The turn- 
key password provides an extra measure of control over file usage. When 
the turnkey password is specified on the CATALOG card, no permission is 
granted unless the user includes the turnkey on the ATTACH card. 

The password for the permission type defined by CATALOG must be given on 
the ATTACH card to access that particular function. 

Example: If the CATALOG card contains RD=ALPHA and EX=BETA, the 
password ALPHA must be included on the ATTACH card to gain 
permission to read the file, and BETA is necessary to write it. 
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When a permission type is not defined on the CATALOG card, it is granted 
automatically. 

Example: If the CATALOG card contains only read (RD) and modify (MD) 
passwords and the ATTACH card contains the modify password, 
control permission and extend permission are granted automati- 
cally. 

1. On the CATALOG card of a file: 
TK=JIM, EX=JOHN, MD=MINE ,RD=YES 

On subsequent ATTACH cards : 

Passwords Permissions granted 

PW=JIM,JOHN Extend, control 

PW=JIM,MINE Control, modify 

PW=YES,JOHN None 

no password None 

PW=JIM,YES Read, control 

2. On the CATALOG card of a file: 
EX=JACK, CN=CONT 

On subsequent ATTACH cards: 
Passwords Permissions granted 

PW=CONT Control, modify, read 

PW=JACK Extend, read, modify 

no password Read, modify 

3. On the CATALOG card of a file: 
TK=M YFILE , EX=PASS 

On subsequent ATTACH cards : 

Passwords Permissions granted 

PW=MYFILE Read, control, modify 

PW=MYFILE,PASS Read, extend, modify, control 

no password None 

PW=PASS None 
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4. On the CATALOG card of a file: 
CN=A , MD=B , EX=C , RD=D 

On subsequent ATTACH card: 
Passwords Permissions granted 

PW=D Multi-read access 

PW=C,D Read, extend 

5. On the CATALOG card of a file: 
CN=A,MD=B,EX=C 

On subsequent ATTACH card: 
Passwords Permissions granted 

no password Multi-read access 

PW=C Read, extend 

6. On the CATALOG card of a file: 
CN=A,MD=A,EX=A 

On subsequent ATTACH card: 

Passwords Permissions granted 

no password Multi-read access 

PW=A Read, extend, modify, control 



Any attempted breach of privacy causes immediate job termination with a 
dayfile message. If permission is not granted when ATTACH is requested, 
the job is terminated. After a permanent file is attached, any attempt to 
perform an operation not permitted will cause job termination. 



13.2.4 

UNIVERSAL 

PERMISSION The universal permission feature is an installation option. It this option 

has been activated, the installation must define a nine -character password 
as the universal permission password. SCOPE will grant CONTROL per- 
mission if the universal permission password is given by a user. 
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To use this option, the file must first be attached as follows: 

JOB 

ATTACH(LFN, FILES, CY=10,PW=UNIVEPERM) 

PURGE (LFN) 

6-7-8-9 

UNIVEPERM is the universal permission password and IP. UP is set to one. 



13.3 

PERMANENT FILE 
CALLS 



Permanent file functions described in this section are available as control 
cards or running program calls (macros). The same parameters are used 
for both; the difference is in the format of the call, and in the ability to test 
status in the running program. 



13.3.1 

PARAMETERS 



The parameters described below are common to both control card and macro 
functions. Parameters (except lfn and pfn) may appear in any order on con- 
trol cards or macros. Each is written cc (value or password) where cc is 
the two-letter code; only lfn and pfn are order dependent and if left blank, 
commas must be inserted. 



lfn Logical file name, 1-7 alphanumeric name (first character 

alphabetic) by which file is known and referenced at a control 
point. Once a permanent file is attached to a control point, it 
is referenced by this name. 

pfn Permanent file name, 1-40 alphanumeric characters assigned 
by file creator under which a file is catalogued. 

RP Retention period (days), 0-999, specified by creator; indefinite 

retention indicated by 999. The installation defines default value. 

PP Privacy procedure parameter; 1-9 characters, used by installa- 
tions to pass information to installation-defined procedure. 

CY Cycle number (1-63) assigned by creator. The default value on 
initial CATALOG is 1, and on ATTACH, the highest number 
cataloged. 
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PW The list of passwords indicated on ATTACH card to establish 
user's access permission; written as: 

PW=psw ,psw 2> psw g psw n 

PW is also used on CATALOG card when a new cycle is added. 

TK Turnkey password 

CN Control password 

MD Modify password 

1-9 alphanumeric 

EX Extend password ) characters 

RD Read password 

ID Identifies file creator at catalog time 

SD Subdirectory number, 1-999 

If a user assigns parameter values other than those specified above, the 
results will vary depending upon the parameter and value selected. 



13.3.2 

MACRO EXPANSION 

AND FDB Each permanent file macro expansion contains a call to CPC (central pro- 

gram control). CPC, in turn, calls for execution of the function by the 
system routine PFx. Parameters necessary for execution of a function 
are contained in a central memory table called the file definition block 
(FDB). 

The macro for generating an FDB has the format: 

| fdbaddr FDB lfn,pfn, parameter list. 

fdbaddr is the symbol to be associated with word 5 of the FDB and must be 
present in the location field. Parameters are separated by commas, and 
the list is terminated by a blank. Parameters may include any of the 
2-letter codes in section 13.3. 1. Parameters will be entered into the FDB 
in the order listed. 

The FDB will be generated in-line during assembly whenever the macro is 
called. 

If the RC parameter is specified in the function call referencing an FDB, a 

I return code will be available to the user in word 5 of the FDB which is equal 

to fdbaddr. These codes are listed in section 13.3.4. 
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13.3.3 

CONTROL CARDS 



Control card requests take the forms: 

name(lfn) 

name(lfn,pfn, parameters) 

lfn (logical file name) and pfn (permanent file name) identified by position. 
Parameters may be listed in any order, separated by commas, and termin- 
ated with a right parenthesis. Each parameter is identified by its 2-character 
code. For example: 

ATTACH(OLDPL, PROGRAMLIBRARYDEC13, PW=OPLREAD, SD=6) 

Continuation control cards may be supplied as needed. If a card has no 
terminator, column 1 of the next card is considered the immediate continua- 
tion of column 80. 



CATALOG This request is used to catalog (make permanent) a newly created, local file 
attached to the control point. Cataloging consists of locking out the record 
blocks on which the file resides, and entering the file's location and identi- 
fication into the permanent file directory. 

A CATALOG request may create the first cycle (CY 1 assumed) of a new 
permanent file with a unique name (initial mode); or it may create a new 
cycle of an existing permanent file (newcycle mode). 

The mode of operation is determined by the CATALOG call. Newcycle 
mode is signalled by the presence of the CY parameter, and initial mode 
by its absence. 

control card CATALOG(lfn, pfn, parameters) 
macro CATALOG fdbaddr.RC 

Required parameters are lfn and pfn, or fdbaddr. The parameters may be 
included on the control card or in the FDB. 



ID 

PW 

RP 

CY 

TK 



Creator identification (1-9 characters) 

Password list (has meaning only when a new cycle is cataloged) 

Retention period 

Cycle number 

Turnkey password 
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RD Read password ., 

EX Extend password 

MD Modify password 

CN Control password 

PP Privacy procedure parameter 

SD Subdirectory has meaning only for newcycle mode 

If RC is specified, the user is notified by a return code on a non -fatal error 
condition, at fdbaddr. 

The CATALOG process always searches for a duplicate name. If the SD 
parameter is given on a CATALOG, that subdirectory is searched first. 
When a duplicate name occurs, the action taken depends on the CY param- 
eter, in the following instances, and on the IP.RNF installation parameter. 

1. No CY parameter is specified for a new file. 

2. CY number is a duplicate of an existing file. 

3. No room in existing directory entry for a new cycle (maximum 
of five) . 

In each instance IP.RNF is examined. If IP.RNF=0, the job is terminated. 
If IP.RNF=1, the permanent file name is modified, a new permanent file 
name is created and returned to the user via the FDB, and a message is 
output to the dayfile . 

For random files, the user must ensure that the index has been written out 
as the last logical record of the file before requesting CATALOG; the file 
must be closed. 

To catalog a new cycle of an existing permanent file, the user must provide 
the password necessary to obtain control permission. 

Once a file is cataloged, it remains attached to the control point as a local 
file as if it were an attached permanent file with all access permissions 
granted to it. 
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Examples: 1. Initial Mode CATALOG 

JOB- 
REQUEST (FILE 1) 
COMPASS. 
LGO. 

CATALOG(FILEl, PFILE , CN=XXX , MD=YYY) 
7/8/9 

COMPASS program to create FILE1 
6/7/8/9 

In the above, a COMPASS program is assembled and 
executed. This job writes on FILE1 which has been 
assigned to a permanent file (mass storage) device by 
the REQUEST card. 

After the COMPASS program is completed, the CATALOG 
control card makes FILE1 a permanent file named PFILE. 
Since no CY parameter is specified, cycle 1 is assumed 
and initial mode CATALOG is attempted. If a file named 
PFILE already exists, and IP.RNF=1, the system will 
generate a new name for the file to catalog it. The file 
will be assigned a control password (XXX) , and a modify 
password (YYY); no protection is given on READ or WRITE 
functions. 

2. Initial mode CATALOG: 
JOB. 

REQUEST(TAPE1, MT) 

REQUEST(OLDPL) Assign mass storage 

COPYBF(TAPEl, OLDPL) 

CATALOG(OLDPL, PROGLIB1, CY=50, CN=XX) 
REWIND(TAPEl) 
6/7/8/9 

This job copies a program library from tape (TAPE1) to 
mass storage and makes it a permanent file. The file 
OLDPL is assigned to a permanent file (mass storage) 
device. The CATALOG card causes the file OLDPL to 
be made permanent under the name PROGLIB1, cycle 50. 
If a file of the same name already exists in the system and 
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neither a CONTROL or TURNKEY password was defined, 
an attempt is made to CATALOG in newcycle mode. The 
latter is possible only if there is space for an additional 
cycle, and a cycle 50 does not already exist. 

Assuming an initial CATALOG is executed, the file will be 
cataloged with CONTROL permission. If a newcycle 
CATALOG is executed, it will assume the passwords of 
the other cycles of the file and the CN parameter will be 
ignored. 

Initial mode CATALOG: 



FDBA FDB LF1, MFILE1,CN=Z, MD=X, TK=Y 



CATALOG FDBA.RC 



The above assumes file LF1 exists, local to this control 
point, on a valid permanent file device. 

The CATALOG macro references FDBA which contains the 
parameters necessary to make LF1 permanent. As CY is 
not specified, an initial mode CATALOG is attempted. The 
RC parameter on the CATALOG indicates that on a non-fatal 
error, control will be returned to the user (a return code is 
available in location FDBA). If RC is not specified, the 
user's job is terminated with a diagnostic message on 
detection of a non-fatal error. 

4. Newcycle mode CATALOG 



FDB5 FDB LF16, PFILE, CY=12, PW=XXX) 



CATALOG FDB5 
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This job adds a second cycle to the permanent file PFILE 
created by example 1. LF16 is again assumed to be a 
valid file on a valid device. The PW password is used to 
submit passwords to establish control permission. XXX is 
the only password required, as no TURNKEY was defined 
on the initial CATALOG in example 1. 

If for any reason, the CATALOG in example 1 failed, PFILE 
would not exist and a newcycle CATALOG not executed. In 
this event, an initial CATALOG would be attempted. How- 
ever, as no passwords are defined on the FDB, the file 
would be cataloged unprotected. If this is undesirable, an 
alternative form of the FDB follows: 

FDB5 FDB LF16, PFILE, CY=12, PW=XXX, TK=ZZZ 

The above FDB would perform the same as for a newcycle 
CATALOG as the TK parameter would be ignored. However, 
if an initial CATALOG occurred under the circumstances 
described above, the PW parameter would be ignored and 
the file would be protected by the TK password (or any 
other passwords specified) . 

Assuming the installation has more than one subdirectory, 
the user would have been informed of the subdirectory num- 
ber after the successful CATALOG in example 1. He would 
have specified this number to expedite any subsequent 
attempts to perform a newcycle CATALOG of the file. 

5. JOB. 

REQUEST(LOC) Assign mass storage 

REQUEST(TAPEX,MT) 

COPYBR(TAPEX, LOC) 

CATALOG(LOC, PROBLIB1, SD=6 , CY=21, PW=XX) 

EXIT. 

CATALOG(LOC, SCRATCH, TK=ABC, RD=DEF,RN=1) 

6/7/8/9 

This job copies a file from tape to a file on a permanent file 
device. Assuming example 2 was successful, a newcycle 
CATALOG is attempted. First, subdirectory 6 is scanned 
for the entry. CONTROL permission is established by the 
PW parameter, and the newcycle CATALOG is executed. 
If errors are encountered, the statements after the EXIT 
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card will be executed. This will cause an attempt to 
CATALOG the file under a different name (SCRATCH) . 
The latter is an initial CATALOG and the file will be 
given TURNKEY and READ protection. 

ATTACH ATTACH must be used to access an existing permanent file. The ATTACH 
procedure ensures that the user has legal access to the permanent file and 
makes it a local file. 

control card ATTACH (lfn.pfn .parameters) 
macro ATTACH fdbaddr.RC 

Required parameters are lfn and pfn, or fdbaddr; pertinent optional param- 
eters are: 

CY The cycle of the file to be used 
PP Privacy procedure parameter 
PW 1 to 5 passwords to establish access permissions 
SD Number of the subdirectory of this file's entry 

The RC parameter is used the same as for CATALOG. 

If the CY parameter is not present and the file has multiple cycles, the 
default cycle is the one with the highest cycle number, presumably the 
latest. If the CY parameter is present and the cycle number is not known 
to the system, the request cannot be honored. 

System evaluation of passwords establishes the type of access granted to the 
user for each file. Subsequent to ATTACH, the user cannot access the file 
in any way for which he does not have permission. For example, if ATTACH 
results in READ permission only, the user cannot subsequently use MODIFY 
or EXTEND. 

Multi-read access is possible by generating READ permission only. If 
another control point also has this file attached and multiread access is not 
possible, the permanent file manager will wait for access to the file. 

If SD is present, but the file is not found in the specified subdirectory, the 
entire directory will be searched; and a dayfile message will advise the user 
of the correct subdirectory. 

Before a file can be used after an ATTACH, the file must be opened. ATTACH 
does not imply opening the file. The success of an OPEN request depends 
upon the permissions granted when the file is attached. 

An incomplete cycle may be attached if the cycle parameter has been specified 
with a cy keyword. Control will be the only permission granted in this case. 
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Examples: 1. JOB. 

ATTACH(LFILE, PFILE, PW=XXX,ZZZ) 
remainder of job 

6/7/8/9 

The permanent file PFILE (as created by example 1 under 
CATALOG) is attached by control card. It is given the 
logical file name LFILE and will be referenced subsequently 
as such. As no SD parameter was specified, all subdirec- 
tories will be searched for the file. Because only control 
and modify passwords were defined at CATALOG time (in 
example 1 under CATALOG), EXTEND and READ permis- 
sions will be granted by default. In addition, since the 
control password XXX was included in the password list, 
CONTROL permission is also granted. The extra password 
ZZZ will be ignored, but will not cause an error. 

CY is not specified in the ATTACH so the cycle with the 
highest number will be attached. 

2. FDBZ FDB LF, PFILE, SD=5,CY=1 



ATTACH FDBZ,RC 

This sequence illustrates an ATTACH by system macro 
using the file created in example 1 under CATALOG. 

Subdirectory five (if it exists) will be scanned first for the 
file. If it is not found, or if the subdirectory does not exist, 
all subdirectories will be scanned. If example 1 under 
CATALOG executed correctly and the file has not been 
purged, it will be found. Setting CY to 1 ensures that cycle 1 
is attached (compare with example 1 under ATTACH). 

PW is not specified in the FDB, so READ and EXTEND 
permissions are granted by default. There is no multi- 
read access. 

The RC parameters are also specified causing the immediate 
return of an error code to the user at FDBZ on non-fatal | 

error detection. 
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JOB. 

ATTACH(OLDPL, PROGLIB1) 

UPDATE (Q) 

RETURN(OLDPL) 

COMPASS(I=COMPILE) 

7/8/9 

*IDENT ABC 



♦COMPILE DEF 

6/7/8/9 



This job uses the file created by examples 2 and 5 under 
CATALOG. As no cycle number was specified, the file 
created in example 2 (cycle 50) will be attached. As only 
the CONTROL password was defined, MODIFY, EXTEND, 
and READ will be granted. 

This ATTACH causes the permanent file PROGLIB1 to be 
available at this control point under the logical file name 
OLDPL. This is a relatively simple example of an UPDATE 
operation. (Note that the RETURN detaches the file logically.) 

4. FDB1 FDB LF1, PERM,TK=T,MD=M, EX=E, CN=C, PW=T 



CATALOG FDB1 

CLOSE LF1, UNLOAD, RECALL 

ATTACH FDB1 



This sequence assumes initially that a local file LF1 has 
been created, and then cataloged with the name PERM 
(cycle 1 by default) with TURNKEY, CONTROL, MODIFY 
and EXTEND passwords. The PW parameter is ignored 
on a CATALOG operation. 

After the CATALOG is completed, a CLOSE UNLOAD is 
performed, causing a logical detach as does the RETURN 
control card. 
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The file PERM can now be re-attached with the same FDB 
(although it is not mandatory) to conserve CM space. Cycle 1 
is assigned as the default value, since it is the only (and high- 
est number) cycle present. The PW parameter obtains TURN- 
KEY permission, and READ is granted by default. This is an 
example of an implicit READ only type of ATTACH. 

5. JOB. 

REQUEST(LFl) Assign mass storage 

COMPASS. 

LGO. 

CATALOG(LFl, PERM, TK=T, MD=M , EX=E, CN=C) 

RETURN(LFl) 

ATTACH(LF1, PERM, PW=T) 

7/8/9 

program to create LF1 
6/7/8/9 

This example is the control card version of example 4 and 
illustrates the same points without the multiple use of an 
FDB. 

6. FDB1 FDB LF1, PERM, TK=T,MD=M , EX=E, CN=C 
FDB2 FDB LF1, PERM, PW=T 



CATALOG FDB1 

CLOSE LF1, UNLOAD, RECALL 

ATTACH FDB2 

This is the same as examples 4 and 5, except that it uses 
two FDB's. 
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EXTEND This function extends the length of a permanent file. The file must be 
attached to the control point, and EXTEND permission must be granted. 
A file cataloged by a given job may be extended also by that job. EXTEND 
makes permanent only the information that has been added to the end of the 
file (data written normally at end-of -information) . 

control card EXTEND(lfn) 

macro EXTEND fdbaddr, RC 

Required parameters are lfn or fdbaddr. In the macro form, the FDB 
references may be either a new FDB containing only the lfn or the FDB 
used at ATTACH time. RC is used the same as for the CATALOG function. 

The newly written section will acquire the privacy controls of the permanent 
file. If lfn is an indexed file, the current index will be rewritten at the end 
of the file, invalidating any prior indexes. Random files must be closed 
before an EXTEND is issued. 

Examples: 1. JOB. 

ATTACH(LF1, PROGLIB1) 

COMPASS. 

LGO. 

EXTEND(LFl) 

7/8/9 

program 
6/7/8/9 

In the above, the file created in example 2 under CATALOG, 
is attached. A program to write at end-of -information of 
LF1 is compiled and executed. Prior to terminating the 
job, the EXTEND function will make permanent any data 
written at end-of -information of LF1. 
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JOB. 

ATTACH(LFl,PROGLIBl) 

COMPASS. 

LGO. 

7/8/9 

FDBX FDB LF1 

EXTEND FDBX.RC 
6/7/8/9 

This example is similar to example 1, except the EXTEND is 
performed by system macro prior to the end of the program. 
The RC parameter is also specified on the EXTEND. The 
EXTEND references an FDB containing the logical file name. 



PURGE PURGE removes a file from the catalog of permanent files. 

control card PURGE (lfn) 

macro PURGE fdbaddr.RC 

Required parameters are lfn and fdbaddr. CONTROL permission must be 
established. 

PURGE operates in two modes, complete or partial. Each is executed by 
logical file name. 

Complete PURGE 

If, when the PURGE is issued, the user has all four permissions from the 
previous ATTACH, a complete PURGE is attempted. If successful, the file 
becomes a normal logical file without the restraints of permanency. 

If the file is returned, close unloaded, or the job ends, the file will disappear. 
However, if prior to these three possibilities a CATALOG is successfully 
issued, the file can again be made permanent. 
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Partial PURGE 

A partial PURGE is attempted if all four permissions are not granted. 
This type of PURGE preserves the original privacy controls until the file 
disappears at job termination or by a return or close unload. If a file is 
partially purged, it cannot be re-cataloged. The partial PURGE possibility 
is necessary since there is no hierarchy of permissions. If a file were 
completely purged on the control password only, a user could then read or 
write the file. 

The partial purge is also useful for preserving file privacy when the universal 
permission password is used. The latter can be set to grant only CONTROL 
permission thereby allowing the file to be purged. No other action on the file 
is possible. Activation of the universal permission option for control threat- 
ens permanency only and not data privacy. 

Examples: 1. JOB. 

ATTACH(LF1 , PFILE , CY=1 , PW=XXX) 
PURGE (LF1) 

6/7/8/9 



Using the file created in example 1 under CATALOG, this 
job initially attaches LF1, generates CONTROL permission 
by specification, and READ and EXTEND permission by 
default. 

The PURGE card referencing this logical file name then 
executes a partial purge of the file. That is, in the pro- 
gram following the PURGE, LF1 can be read or written, 
but not modified or re-cataloged. When the job terminates, 
the file will disappear. 



FDB1 FDB LF1, PFILE, CY=1,PW=XXX,YYY 
FDB2 FDB LF2.QFILE 

ATTACH FDB1 
PURGE FDB1 

CATALOG FDB2 
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13.3.4 

RETURN CODES 



This is similar to example 1 except that on the ATTACH 
the MODIFY password is given also; thus all four permis- 
sions are granted. The PURGE which follows is complete, 
and the file can be recataloged subsequently, as shown. 



Codes for the 18-bit code/status word in FDB+4=fdbaddr are listed below. 
(Bits 9-17 are error codes; codes greater than 027 cause job termination.) 



User Return Code 
(Octal) 



1 

2 

3 

4 
5 
6 
7 
10 

11 
12 
13 
14 
15 
16 
20 
21 
22 
23 
24 



Meaning 

Function successful 

Not used 

Logical file name already assigned (ATTACH) 

Logical file name not found (CATALOG, EXTEND, 
PURGE, RENAME) 

Blank permanent file name (CATALOG, ATTACH) 

Directory full (CATALOG) 

Catalog full (CATALOG, EXTEND) 

Permanent file device unavailable 

Index not written for a random file on CATALOG 
or EXTEND. 

Illegal device for file residence (CATALOG) 

ATTACH request for unknown file 

Cycle referenced does not exist (ATTACH) 

Invalid cycle number 

Duplicate name/cycle or not slot on CATALOG 

Attempt to CATALOG non-local file 

Function attempted on non-permanent file 

Function attempted on purged file 

CATALOG attempt, no word pair 

Cycle incomplete on ATTACH 

Duplicate ATTACH request 



All errors are fatal on control card requests and on macro requests unless the 
RC parameter is specified. 
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13.4 

PERMANENT FILE 

UTILITY ROUTINES Three utility routines are associated with the permanent file system: 

DUMPF dumps permanent files to tape 

LOADPF loads these files from the dump tape 

AUDIT provides printed reports on the status of each file 

These routines are described in the SCOPE Operator's Guide. 
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APPENDIX SECTION 



CHARACTER SET 



CHAR 


DIS- 


HOLLERITH 


EXT 


CHAR 


DIS- 


HOLLERITH 


EXT 


(printed) 


PLAY 


(punched) 


BCD 


(printed) 


PLAY 


(punched) 


BCD 


A 


01 


12-1 


61 





33 





12 


B 


02 


12-2 


62 


1 


34 


1 


01 


C 


03 


12-3 


63 


2 


35 


2 


02 


D 


04 


12-4 


64 


3 


36 


3 


03 


E 


05 


12-5 


65 


4 


37 


4 


04 


F 


06 


12-6 


66 


5 


40 


5 


05 


G 


07 


12-7 


67 


6 


41 


6 


06 


II 


10 


12-8 


70 


7 


42 


7 


07 


I 


11 


12-9 


71 


8 


43 


8 


10 


J 


12 


11-1 


41 


9 


44 


9 


11 


K 


13 


11-2 


42 


+ 


45 


12 


60 


L 


14 


11-3 


43 


- 


46 


11 


40 


M 


15 


11-4 


44 


* 


47 


11-8-4 


54 


N 


16 


11-5 


45 


/ 


50 


0-1 


21 


O 


17 


11-6 


46 


( 


51 


0-8-4 


34 


P 


20 


11-7 


47 


) 


52 


12-8-4 


74 


Q 


21 


11-8 


50 


$ 


53 


11-8-3 


53 


R 


22 


11-9 


51 


= 


54 


8-3 


13 


S 


23 


0-2 


22 


blank 55 


space 


20 


T 


24 


0-3 


23 


9 


56 


0-8-3 


33 


U 


25 


0-4 


24 


■ 


57 


12-8-3 


73 


V 


26 


0-5 


25 


= 


60 


0-8-6 


36 


w 


27 


0-6 


26 


[ 


61 


8-7 


17 


X 


30 


0-7 


27 


] 


62 


0-8-2 


32 


Y 


31 


0-8 


30 


: 


63 


8-2 


oot 


z 


32 


0-9 


31 


t 


64 


8-4 


14 



* Written as 12 on magnetic tape 
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A-l 



CHAR 


DIS- 


HOLLERITH 


EX1 


(printed) 


PLAY 


(punched) 


BCD 


— 


65 


0-8-5 


35 


V 


66 


11-0 


52t 


A 


67 


0-8-7 


37 


t 


70 


11-8-5 


55 


i 


71 


11-8-6 


56 


< 


72 


12-0 


72tt 


> 


73 


11-8-7 


57 


< 


74 


8-5 


15 


:> 


75 


12-8-5 


75 


- 


76 


12-8-6 


76 


) 


77 


12-8-7 


77 


end-of- 


0000 




1632 


line 










OOxx 


ttt 


ttt 


blank 


55 


6-8 


letttt 



f 11-0 and 11-8-2 are equivalent 

tt 12-0 and 12-8-2 are equivalent 

ttt Since the display character 00 has no BCD or Hollerith equivalent, it may be used as a flag 
character. The flag character together with the character immediately following it (xx) have 
special interpretations. 

tttt A 6-8 punch is converted to a display code 55 with no diagnostic given. 
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FET EXTENSION FOR COBOL AND SORT/MERGE USAGE B 



14 



15 



16 



17 



19 



20 



59 


56 


53 


47 


L3 WORDS of SCOPE-FET 
41 29 23 


17 


13 


8 


5 




Blocker Address 




Deblocker Address 


D 




Record Length 
(logical) 




ST 




U 


Record 
Type 


Record 
Mark 
Value 




Maximum Record 
Length(logical) 


Blocker 

Bytes 

1 


Size of Single 
Occurrence of Trailei 


M 




BCP"f 


Key Position 


1 

Deblocker 
i 

Bytes 

1 


Key Length 


t 


10 
T 




Spacing Control 




Label Address 




Record Count 




Fixed record Length 
(Logical) 


Record Count Rerun Period 



tfor Depending on 
BLOCKER ADDRESS (18 bits) 



This is the address of a routine which packs logical records into an output buffer. The routine 
determines if there is room in the buffer to receive the logical record. If so, the BLOCKER 
routine transfers the logical record to the buffer and updates OUT. If not, the BLOCKER routine 
calls SCOPE to write the buffer area onto an external device before transferring the logical records 
to the output buffer. BLOCKER routines go into RECALL status while SCOPE is processing the data 
transfer. 
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DEBLOCKER ADDRESS (18 bits) 

This is the address of a routine which unpacks logical records from an input buffer into a user's 
record area, or which supplies the user with the record's address in the input buffer. This routine 
determines if the input buffer already contains another logical record. If so, the DEBLOCKER 
processes it as required; if not, the DEBLOCKER calls SCOPE to fill the buffer. DEBLOCKER 
goes into RECALL status during the SCOPE operation. 

D = Disposal Code 

This field for magnetic tape files assumes the following values: 



100 


REWIND (release) 


010 


LOCK (save) 


001 


NO REWIND 



RECORD LOGICAL LENGTH (18 bits) 

This field is the number of 6-bit bytes in the records for fixed length records; for OCCURS (trailer) 
records, it is the size of the fixed portion (length if no trailer items exist); for all other types of 
variable length records, this field contains the minimum record size. 

ST = Logical Status (4 bits) 

This field indicates the logical status of a file: 

1XXX file is currently open 

X1XX file is an optional file 

XX10 records must be counted to control restart dump 

XX01 end of reel condition controls restart dump 

U = Use Code (3 bits) 

This field used by SORT /MERGE , contains an indicator as to the use of the file described by this 
FET. Its values are: 

00 1 sort input 

010 merge input 

100 output 
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RECORD TYPE (6 bits) 

This field describes the kind of records in the file: 

000001 fixed length record 

000010 variable length records (length controlled by key field) 

000100 variable length records (length determined by presence of a record mark character) 

001000 variable length records (fixed portion plus a variable number of fixed length trailer 

items) . This is the COBOL OCCURS DEPENDING ON type of variability. 

010000 universal record. The BLOCKER prefixes each logical record with one word 

containing the number of 6-bit bytes in the record and the DEBLOCKER removes this 
word. Each of the other record types can be mapped into the universal record format. 

RECORD MARK VALUE (6 bits) 

This field contains the octal value of the record delimiter for record mark types. 

MAXIMUM LOGICAL RECORD LENGTH (18 bits) 

This field contains maximum size for variable records of all types as the number of 6-bit bytes in 
the record. It is not used for fixed length records. 

BLOCKER/DEBLOCKER BYTES (12 bits) 

Used in combination with IN (word 3) and OUT (word 4) to specify the next logical record position in 
the CIO buffer to be blocked or deblocked. 

SIZE OF SINGLE OCCURRENCE (18 bits) 
size of one trailer item 

This field contains the number of 6-bit bytes in a single occurrence of the trailer item. It is 
meaningful only for trailer type variable length records. 

M = Mode (2 bits) 

This field indicates the recording format of the length key field: 

binary number 

1 decimal number 

2 floating point integer 

BCP 

Beginning character position for variable length records. 
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KEY POSITION (18 bits) 

This field is interpreted by SORT/MERGE as the position of the first 6-bit byte in the length key 
field H tS length key field begins in the first 6-bit byte of the record, this field contains the value 
of 1. 
This field is interpreted by COBOL as the CM address of the length key field. 

KEY LENGTH (18 bits) 

This field contains the number of 6-bit bytes in the length key field. The ^^l^Ttllner 
number of 6-bit bytes in the record for key field variable records and it contains the number of trailer 
Lms with the record for variable trailer records (OCCURS DEPENDING ON records). This field 
muTt bTgTn within the first n 6-bit bytes when n is MINIMUM LOGICAL RECORD LENGTH less the 
KEY LENGTH. 

t = label type (2 bits)' 

standard labels 

1 non-standard labels 

2 omitted labels 

IN (1 bit) 

Set if file is opened for input or input-output processing. 

OUT (1 bit) 

Set if file is opened for output or input -output processing. 

SPACING CONTROL (18 bits) 

This field contains the count of the number of lines to advance the pointer when the WRITE BEFORE 
ADVANCING or the WRITE AFTER ADVANCING option is used in COBOL. 

LABEL ADDRESS (18 bits) 

The address of a 120-character area where the user places the value to be checked against the value 
in the first physical record of a file declared as having a non-standard label. 

RECORD COUNT (42 bits) 

This field is used to count the records that have been processed in the file described by this FET. 

FIXED RECORD LENGTH (Logical) (18 bits) 

Contains zero for variable length records or the number of characters in fixed length records. 
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FIXED COUNT RERUN PERIOD (30 bits) 

When the ST (logical status field) indicates that a restart dump is to be taken every n records (speci- 
fied by user) , this field contains n (the number of records to be processed between restart dumps) . 

The following macro generates the FET appendix. 

RECORD T, O, C, E, L, D, U 

The RECORD macro generates FET +13 and FET +14. 

T Record type = F, V, T, R, S 

F fixed length records 

V variable length records (key field type) 

T trailer item variable length records (OCCURS DEPENDING ON) 

R record mark variable length records 

S systems record format 

O Optional file indicator 

blank mandatory file 

non-blank optional file 

C Restart dumps controlled by record count 

blank not controlled by 

non-blank controlled by record count 

E Restart dumps controlled by end of reel condition 

blank not controlled by end of reel condition 

non-blank controlled by end of reel condition 

L Record length, number of 6-bit bytes in the record 

D Disposal Code 

R REWIND (release) 

L LOCK (save) 

N NO REWIND 

U Usage 

S sort input 

M merge input 

O output 
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VARIABL L, M, P, K, S, R 

The VARIABL macro creates FET +15 and FET +16. 

L Maximum record length as the number of 6-bit bytes in the largest record 

M Key mode 

B binary 

D decimal 

F floating point integer 

P Key position, position in record of leftmost 6-bit byte in the key field 

K Key length as the number of 6-bit bytes in the key field 

S Size of a single trailer item as number of 6 -bit bytes in item 

R Record mark value as octal representation of delimiting character 

CONTROL P, t, LA 

The CONTROL macro creates FET +17, +18, and +19. 

P Number of records to be processed between restart dumps 

t Label type 

LA Label address for files with non-standard labels 
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STANDARD LABELS 



Standard Labels are all recorded in the BCD mode at a density defined by an installation parameter; 
they are 80 characters in length. 

The labels, as described, are designed to conform to the proposed USA Standard for Magnetic Tape 
Labels and File Structure for Information Interchange submitted by the x. 3.2/457 Committee on 
November 28, 1966. 

In this appendix, "n" means any numeric digit, through 9; and "a-" means any of the 6-bit charac- 
ters of the character set in Appendix A . 

An optional field may, but does not necessarily, contain the information described. If an optional 
field does not contain the designated information, it should contain blanks. Fields not described as 
optional are considered to be mandatory and must be written as specified. 
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VOLUME HEADER LABEL 
Field Name 

1 Label Identifier 

2 Label Number 

3 Visual Reel 
Number 

4 Security 



Volume Density 



Reserved for 
operating system 

Reserved for 
future standard- 
ization 



Length Position Description 

3 1-3 Must be VOL 

1 4 Must be 1 

6 5-10 Six n characters i 

1 11 Blank = not security protected 

Non-blank = security protected 

1 12 Density of file information on tape 

blank or 00 = 556 bpi 

1 = 200 bpi 

2 = 800 bpi 

19 13-31 Must be blank 

49 32-80 Must be blank 
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FILE HEADER LABEL 



Field 


Name 


1 


Label identifier 


2 


Label number 


3 


File label name 


4 


Multi-file 




identification 



10 



11 



12 



13 



Reel number 



Multi-file 
(position -number) 

Reserved for future 
standardization 

Edition number 

Reserved for future 
standardization 

Creation Date 



Reserved for future 
standardization 

Expiration date 



Security 



Length 

3 
1 

17 ... 
6 



Position 

1-3 
4 

5-21 
22-27 



28-31 



32-35 



36-39 



40-41 



42 



43-47 



48 



49-53 



54 



Description 

Must be HDR 

Must be 1 

Any a characters to identify this file 

Any a characters to identify the set of 
files that includes this one. This ID 
must be the same for all files of a 
multi-file set (mfn) 

4 n characters. Incremented by one 
immediately after trailer label is 
written on the volume 

4 n characters denoting position 
number of file within the set of files. 

Must be blank 



Two n characters distinguishing 
successive iterations of same file 

Must be blank 



Date file was created; YYDDD, which 
is 2 n characters for year and 3 n 
characters for Julian date (001 to 366) 

Must be space 

Same format as Field 10. This file is 
regarded as expired when today's date 
is equal to or later than the date given 
in this field. When this condition is 
satisfied, the remainder of this volume 
may be overwritten. To be effective on 
multi-file volumes, therefore, the ex- 
piration date of a file must be less than 
or equal to the expiration date of all 
previous files on the volume 

Same as field 4 of the Volume Header 
Label 



14 


Block Count 


6 


55-60 


Must be zeros 


15 


Reserved for future 
standardization 


20 


60-80 


Must be spaces 
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FILE TRAILER LABEL 



Field 


Name 


Length 


Position 


1 


Label Identifier 


3 


1-3 


2 


Label Number 


1 


4 


3-13 


Same as corre- 
sponding fields 
in File Header 
(optional) 


50 


5-54 


14 


Block Count 


6 


55-60 



15 Reserved for future 

standardization 



20 



61-80 



Description 

Must be EOF 

Must be 1 

Same as corresponding fields in 
File Header 



Six n characters, number of data 
blocks (including labels and tape 
marks) written since last File Header 
Label 

Must be blank 



VOLUME TRAILER LABEL 



Field 


Name 


Length 


Position 


1 


Label Identifier 


3 


1-3 


2 


Label Number 


1 


4 


3-12 


Same as corre- 
sponding fields in 
File Header 
(optional) 


50 


5-54 


13 


Block count 


6 


55-60 



14 



Reserved for future 20 



61-80 



Description 

Must be EOV 

Must be 1 

Same as corresponding field in 
file header 



6 n characters , number of data blocks 
(excluding labels and tape marks) 
written since preceding volume 
label 

Must be blanks 



The volume trailer label format is identical to file trailer label format except for the third 
character. 
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The 3000 series labels has the following format: 

Header 80 BCD characters 

Character Position 

1 Recording density, 2, 5, or 8, indicating 200, 556, or 800 bpi 

2-3 Unique label identifier ( ) 

4-5 Logical unit number, 2 digits 

6-8 Retention cycle, 3 digits 

9-22 Filename, 14 alphanumeric characters 

23-24 Reel number, 2 digits 

25-30 Date written; Month, Day, Year (mmddyy) in File ID 

31-32 Edition number, 2 digits 

33-80 User supplied information 



Trailer 80 characters, EOF or EOT, each followed by block count 

EOT, block count Indicates end of reel for multi-reel files; it is preceded by one and 
followed by two tape marks. 

EOF, block count Ends a file or multi-files; it is preceded by one and followed by one or two 

tape marks. 



EOS 

Two tape marks 



3600 SCOPE end-of-system label 
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RELOCATABLE SUBROUTINE FORMAT 



The deck of one subprogram (subroutine) as it is output from an assembler or compiler comprises 
one logical record. Each logical record is made up of an indefinite number of tables. Each table is 
preceded by an identification word which specifies to the loader the procedure to be followed in 
loading the table. The identification word has the format: 



CN 




wc 




LR 


L 



59 



53 



47 



35 



26 



17 







CN = Code number identifying type of data in table (text, entry points, external references, etc). 

WC = Word count in table excluding identification word 

LR = Method of relocation for the load address 

L = Load address, 18 -bits as defined for each type of table 

LR and other relocation fields in the tables are nine bits long. Six of the nine are used currently; 
the other three are reserved for future expansion. 

Prefix Table 

The prefix table, if present, is the first table in a subroutine. It is bypassed by the loader. The 
prefix table is used by EDITLIB in constructing or modifying the SCOPE library. The format of 
the table is: 



CN 



77 LR and L are ignored. 

o 



word 1 



name of subprogram 





word 2 



59 



date typed by operator at deadstart time, one leading 
and one trailing blank. 



17 



The binary output from an assembly consists of all loader control cards (LCC) written as individual 
records, then an identification table of 14 words is written (77-table), followed by the deck. If 
errors occur in assembly, no binary output, except the 77-table and any LCC records, will appear. 



60189400 Rev. I 



D-l 



For absolute programs , following the 77 table is another control word followed by the absolute 
program. This control word contains: 



5000 L„ L„ ffff fftt tttt 
1 2 



CP Programs: 

hi = primary overlay level number 
L 2 = secondary overlay level number 
= 00 for first overlay 

= origin -1 as specified on the IDENT line 
= entry point address as specified on IDENT line 
PP Programs: nnnn nnOO ffff 0000 cccc 
nnnnnn = program name 
ffff = origin -5 as specified on the IDENT line 

cccc = program length (including this control word) in central memory: (program 
length+9)/5 



L 1' L 2 
ffffff 

tttttt 



PIDL 

Program identification and Length table contains the subprogram identification and declarations 
concerning common block allocation. 

Identification Word 

CN 34 8 

LP. Unused 
L 



word 1 



59 



name of subprogram 



PL 



17 



PL Program length 



words 2-WC 



name of common block 



BL 



59 



17 



If blank common, name is 7 display code blank characters. 
BL Block length 
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If WC=1, no common references appear in the program. Subprogram length is relevant only in the 
first PIDL table. All PIDL tables must appear before any other tables for a given subprogram. The 
names of common blocks may not be duplicated in a PIDL table. The list of common block names is 
called the Local Common Table (LCT) . Since relocation of addresses relative to common blocks is 
designated by positions in LCT, the order of the common block names is significant. 

The first word in the LCT is referred to as position 1. 



ENTR 

The entry point table contains a list of all the named entry points to the subprogram and its 
associated labeled common blocks. The ENTR table must immediately follow the PIDL table. 

Identification Word 

CN = 36 8 
LR = . Ignored 
L = Ignored 

Words 1 through WC 

Each entry in the table is 2 words long. The first word contains the name of the entry point. 
The second word contains the location of the entry point. 



first word 



entry point name 





59 



17 



second 
word 





RL 


LOC 



59 



26 



17 



RL 



relocation of the address specified by LOC; 

absolute, relative to RA (no relocation) 

1 program relocatable 



3-77 



8 



relative to common block M, where M is in position RL-2 of LCT. M must 
not refer to blank common. 



LOC = address of entry point 
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TEXT 

Text and data tables contain data comprising the subprogram and information necessary for properly 
relocating the data. The table consists of: an origin for the data, the data itself, and indicators 
describing relocation (if any) of the three possible locations in a data word which may refer to 
addresses in memory. TEXT tables may appear in any order and any numbers. 

WC must be in the range 2 through 20g. 

Identification word 

CN = 40 g 

LR = relocation of load address (L) 

absolute, relative to RA 

1 relative to program origin 

3-77 8 relative to labeled common block M; M is in position LR-2 of LCT. Values of 
2 and n, where n refers to blank common, are not permitted. 

L = load address. Initial location of data appearing in the second word of the table. L will 
be relocated using LR. 



First Word 

Relocation word consists of a series of 4-bit bytes describing the relocation of each of the three 
possible address references in a 60-bit data word. The first byte (bits 56-59) describes the re- 
location for the data word in the second word of the TEXT table, etc. The number of relevant 
bytes and data words is determined by WC. Relocation is relative to program origin or the comple- 
ment of the program origin (negative relocation). The value and relocation for each byte follows: 

000X no relocation 

10XX upper address, program relocation 

11XX upper address, negative relocation 

010X middle address, program relocation 

011X middle address, negative relocation 

1X10 lower address, program relocation 

1X11 lower address, negative relocation 

0010 same as 1X10 

0011 same as 1X11 

The above designations permit independent and simultaneous relocation of both upper and lower 
addresses. 
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Words 2 through WC 

Data words are loaded consecutively beginning at L. Their addresses are relocated as specified by 
the corresponding byte in the relocation word. With the text table, all addresses are relocated 
absolute or relative to program origin, never relative to a labeled common block. As a result, 
addressing relative to labeled common for text must be accomplished through FILL tables. 

FILL 



The FILL table contains information necessary to relocate previously loaded address fields/ 
References to common are relocated through this table. Program relocation may also be effected 
using the FILL table, although the usual method (with fewer words) is to use the TEXT table. Re- 
location specified by FILL tables is accomplished after all programs from the input file are loaded; 
so that text referenced by the FILL table may appear after it. Since FILL tables are processed in 
order, the results of a FILL table will be preset when subsequent relocation is specified. For 
example, multi-loads into labeled common should be avoided as the result will be unpredictable. 

Identification Word 

CN = 42 8 
LR = 
L = 

Words 1 through WC 

All remaining words are partitioned into sets of 30-bit contiguous bytes, each set is headed 
by one control byte and followed by an indefinite number of data bytes. The last byte may be 
zero. The control byte contains information concerning each of the subsequent data bytes 
until another control byte is encountered. 

A zero byte is treated as a control byte in the format: 








AR 



29 8 

AR is the relocation of the value in the address position of a word specified in the succeeding data 
bytes. AR has the value: 

absolute, relative to RA (no relocation) 

1 program relocation 

2 negative relocation 

3-77 relative to common block M where M is in position AR-2 of LCT. 
o 
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One control byte suffices for several data bytes. The format of the data byte is: 



IP 



RL 



LOC 



n 



29 26 



17 



P = Position within word of address specified by RL and LOC. 

10 upper 

01 middle 

00 lower 
RL = Relocation of address specified by LOC. 

RL has the same range of values as AR in the control 

byte except that 2 and any reference to blank common 

are illegal. 

LOC = Address of data word to be modified. 

The contents of address field position (P) at location 
LOC relative to RL is added to the origin as specified 
by AR in the control byte. 



LINK 

The LINK table indicates external references within the subprogram. Each reference to an external 
symbol must appear as an entry in LINK. 

Identification Word 

CN = 44 8 
LR = Ignored 
L = 

All remaining words are partitioned into sets consisting of one 60-bit name word and a series of 
30-bit contiguous data bytes indicating address positions which refer to the external symbol described 
in the name word. It is possible for the name word to be split between two computer words. 



name of external symbol 



59 



17 
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Names of external symbols (7 characters) must begin with a character for which the display code 
representation has a high order bit equal to zero. The data bytes have the form: 



1 P 



RL 



LOC 



29 26 



17 



P = Position within the word of the reference to the external symbol: 

10 upper 

01 middle 

00 lower 

P. = Relocation of address specified by LOC 

absolute, relative to RA 

1 program relocation 

3-77 8 relative to common block M where M is in position RL-2 of LCT. 
LOC = Address of the word containing the reference to the external symbol 

RE PL — Replication Table 

The REPL table permits the repetition of a block of data without requiring one word per location in 
a TEXT table. 

Identification Word 

CN = 43 g 

LR = Ignored 

L = 1 if replication is not to be deferred until all text is loaded. (Instant replication) 

Words 1 through WC 

Each entry in the table consists of two words in the format: 



word 1 
word 2 



59 



B 



41 



SR 



DR 



26 



17 



D 
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S = Initial address of the source data, should be non-zero 

SB = Relocation of the address specified by S. 

Absolute, relative to RA 

1 Program relocation 

3-77 8 Relative to common block M, where M is in position SR-2 of LCT. M must 
not refer to blank common 

D = Initial address of destination of data 

DR = Relocation of address specified by D; range of values same as SR- 

B = Size of data block 

C = Number of times data block is to be repeated 

I = Increment to be added to D before each data block is repeated, first repetition of 

block is at D, second at D+I, etc. The data block (B-long) with origin at S is 
repeated C times beginning at D the first time, and beginning at the previous 
origin plus I thereafter. 

If C = C is interpreted as 1 

If B = B is interpreted as 1 

If I = I is interpreted as B 

If D = D is interpreted as S+B 

XFER - Transfer Table 

The XFER table indicates the end of a subroutine and a pointer address. 

Identification Word 

CN = 46 

LR = Ignored 

L = Ignored 



entry point name 



59 ~ 17 



The entry point name need not be in the subprogram. If name is blank, there is no named XFER. 

The location of the entry point is returned following a loader request. If a named XFER is en- 
countered prior to an EXECUTE, control is transferred to that entry point. Otherwise, the job 
is aborted with the comment NO TRANSFER ADDRESS. If more than one subprogram has a 
named XFER, control is given to the last encountered XFER name. 



D _ 8 60189400 Rev. L 



SYSTEXT - Systems Text 

Normally, systems text is derived from the library overlay named SYSTEXT, and is assembled prior 
to assembly of the source program, although this may be changed through the S option. Systems text 
overlays on the library look like loader overlays with the following control word: 

5000 0101 0000 0000 0000 

Data consists of coded lines. A minus zero word follows the last coded line. 

Systems text can be deleted by using the S option with a dummy (non-existent) record name. A non- 
fatal loader message is produced when COMPASS attempts to load the overlay. 
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CARD FORMAT 



Column 1 



7,8,9 

6,7,8,9 

7,9 

7 and 9 not both in column 1 



End of logical record 
End of file 
Binary card 
Coded card 



Columns 
12 3 4 5 
12 / 



11 


1 

2 

•$. 3 

o 
f£ 4 

5 
6 

7 



77 



Column Binary Information 



^ ^ 



80 



V a! 

a a 

ID U 

CO a> 

m S 

«j 3 



A binary card can contain up to 15 central memory words starting at column 3. Column 1 also 
contains a central memory word count in rows 0,1,2 and 3 plus a check indicator in row 4. If 
row 4 of column 1 is zero, column 2 is used as a checksum for the card on input; if row 4 is one, 
no check is performed on input. 

Columns 79 and 80 contain a binary serial number. If a logical record is output on the card punch, 
each card has a checksum in column 2 and a serial number in column 80, which orders it within 
the logical record. 

Coded cards are translated on input from Hollerith to display code, and packed 10 columns per 
central memory word. A central memory word with a lowest byte of zero marks the end of a coded 
card (it is a coded record) , and the full length of the card is not stored if it has trailing blanks . A 
compact form is thereby produced if coded cards are transferred to another device. 
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Card Files 

Any punched cards can be read: standard types or free-form cards. 
Four types of cards are considered standard: 

A card with 0017 octal in column 1 is recognized as an end-of-file marker. 

A card with 0007 octal in column 1 is recognized as an end-of -record marker. The level is 
assumed to be zero unless columns 2 and 3 contain a level number punched in Hollerith form. 
The level number is read as octal. The following are valid punches (b represents a blank): 

00 or 0b 04 or 4b 10 14 

01 or lb 05 or 5b 11 15 

02 or 2b 06 or 6b 12 16 

03 or 3b 07 or 7b 13 17 

Any card other than the above with 7,9 punches in column 1 is assumed to be binary. It must 

contain 0105, 0205, 0305 1605, or 1705 in column 1 and a correct checksum in column 

2; or 0145, 0245 1645, or 1745 in column 1, in which case column 2 is ignored. The 

first two digits, 01 or 17, give the word count of the card. Each word occupies 5 columns, and 
the first word of information begins in column 3. Columns after the last word of information, 
up to and including column 78, are ignored. The lower 5 bits of column 79, and all 12 bits of 
column 80 constitute a 17-bit serial number for the card within its record. If the cards of a 
binary record do not have these numbers in correct sequence (beginning at 1 for the first card), 
a message is given but the cards are accepted. The checksum is the one's complement of the 

I sum of all information columns, this sum is formed as if in a 12-bit accumulator with circular 

carry. Checksums 7777(octal) and 0000 are equivalent. 

Any card that does not have 7 and 9 punched in column 1 is assumed to contain Hollerith-punched 
information, one 6-bit character per column, or eight 60-bit words per card. Any column that 
does not contain a valid Hollerith combination is read as a blank, and a message containing the 
record number and the card number within the record is given. To be a valid Hollerith combina- 
tion, a column must contain one of the following: 

12 and 0, or 11 and 0, and no other punches 

or 

Not more than one of the punches 12, 11, and 0, with 

No additional punch, or any one punch from 1 to 9 

or 

An 8 punch with one more punch from 2, 3, 4, 5, 6, 7 

Binary and Hollerith -punched (coded) cards may be mixed within one record, but a message is 
given containing the number of any record containing one or more mode changes. 
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Free -form cards 

It is also possible to set up a record of one or more cards that will be read as sixteen 60-bit words 
per card (80 12-bit columns), with no format checking; except that a card with octal 0017 in column 1 
with no other punches, will be interpreted as an end-of-file no matter where it occurs. This rule 
prevents the separator between jobs in the input stack from being accidentally missed. A card with 
0017 in column 1, if it has at least one punch in at least one other column, can be read as 16 words 
without format control, though normally it would be an end-of-file separator. 

Such a special record can be set up as follows: 

1. A card with octal 7777 in column 1, and 7777 in column 2, and no other punches. No 
information is read into memory from this card; it signals that free-form cards will follow. 

2. Any number of cards punched in any manner, except that none must be identical to the 
above card, and none must be an absolute end-of-file card. These cards are read as 
binary cards, each containing 16 words of information. 

3. A card identical with card .1. No information is read into memory from this card; it 
signals the end of free-form cards. Normal binary or coded cards, or an end-of -record, 
should follow. 

4. An end-of -record card. This is interpreted normally, because free-form reading has 
terminated. 

If it should be necessary for the record of free-form cards to include a card identical to the card 
described in 1 above, a slightly different card could be chosen to begin and end free -form reading. 
Any card with octal 7777 in column 1 and in one other column with no other punches is recognized 
as signalling that free -form cards follow until an identical card or an absolute end-of-file is read. 
Therefore, there are 79 possibilities to choose from. 

A series of free-form cards will normally be organized into one record; however, it can be preceded 
and/or followed by binary and/or coded cards within the same record. The information will be 
read but a mode-change message will be issued for the record. Thus a record might validly consist 
of the following: 

1. A series of Hollerith punched cards. Read as 10 words each. 

2. A start -free-form card, e.g. , 7777 in columns 1 and 80, and no other punches. 

3. A series of cards not including an absolute end-of-file, nor any card identical with 2. Read 
as 16 words each. 

4. A card identical with 2, acting as a close -free-form card. 

5. A start -free-form card, which might be either the same as or different from 2 and 4. 

6. A series of cards not including an absolute end-of-file, nor any card identical with 5. 
Read as 16 words each. 

7. A card identical with 5, acting as a close -free -form card. 
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8. A series of standard binary cards. Each card contains 1 to 15 words, established by the 
word count in column 1. A serial number check message would be given unless the serial 
number in columns 79-80 of each binary card correspond with the position of that card in 
the record as a whole, not merely with its position in the current group of binary cards. 

9. An end-of -record card, closing the record. The record would produce a mode change 
message. 

Cards can be punched by programs under SCOPE 3. 1 in three different formats corresponding with 
the modes of reading described above. If the disposition code of an output file is octal 0010, each 
record will be punched as one or more cards, with 80 valid Hollerith coded characters per card 
Unused columns at the end of the last card will be blank, and an end-of -record card will close the 
record. Such a record could be read in without producing any messages. 

If the disposition code of a file is octal 0012, each record will be punched as a standard format 
binary record, which could be read in without producing any messages; the serial numbers in 
columns 79 and 80 of the cards would all be correct. (Since a deliberate mixture of standard binary 
cards with other types of cards inside a single record is rare, as is the deliberate withdrawal or 
rearrangement of standard binary cards in one record, the serial number check message will 
normally indicate that cards of a standard binary record have been accidentally misarranged. ) 

If the disposition code of an output file is octal 0014, each record is punched as one or more cards, 
with 16 words of information, five columns to a word, on each card. If the record does not contain 
an exact multiple of 16 words, the unused columns on the right of the last card remain blank. An 
end-of -record card follows the last information card; but such a record probably could not be read 
in. It would be necessary: 

• To make certain that the record contained no absolute end-of -file card (0017 in column 1 
and 0000 in all other columns) . Such a card cannot be read as anything but an end-of -file. 

• To put a start-free-form card ahead of the first card of the record, and an identical end- 
free-form card between the last information card and the end-of -record card. The punches 
for these two cards must not be identical with any of the information cards. 
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FIELD LENGTH CALCULATION IN OCTAL 

The Field Length (memory requirements) for a program during execution after it has been loaded is: 

LWA LOAD (rounded up to the nearest 100) 

However, loading a program may require more memory space for the loader program and its 
tables. This value, rounded up to the nearest 100, is the larger of the two quantities: 

LWA LOAD 

or 

BLNK COMN + field length - FWA TABLES 

(If BLNK CMN address = or is less than LWA LOAD, replace BLNK COMN with LWA LOAD in formula. )| 

Field length is obtained from the JOB card or RFL card. LWA LOAD, BLNK COMN, and FWA 
TABLES values are obtained from the core map. 

Example : 

For the example program used in this appendix: 

Field Length = 40000 
LWA LOAD = 7316 
BLNK COMN = 7314 
FWA TABLES = 34023 

The field length required for execution is 7400 (7316 rounded up to the nearest 100) . 
The field length required for loading is 13300 (13273 rounded up to the nearest 100). 

LWA LOAD + field length - FWA TABLES 

7316 40000 34023 = 13300 (13273 rounded) 

NOTE: This value does not reflect the memory required by CP LOADER for the 
Entry Point/External Reference Tables. If there is insufficient space to 
contain the Entry Point Table, loading will be aborted. 
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SYSTEM SYMBOL DEFINITIONS 



System symbols (for installation parameters, CMR table lengths, locations, pointers, PP resident 
entry points and monitor functions) consists of three parts: 

• Identifier of one or two characters , denoting the group to which it belongs 

• A period following the identifier to indicate that it is a system symbol 

• Mnemonic of 1-6 characters which suggest the meaning of the symbol 

When SCPTEXT and IPARAMS are to be used, the definition of symbols of the above form is to be 
avoided. 



System 
Symbols 

CH.x 
CP.x 
C.x 



D.x 



Definition 

Psuedo-channel numbers 

Locations within the central processor resident program area 

Byte positions (12-bit) within central memory words; bytes are numbered from left 
to right as 0-4. x represents the name of a field within the specified byte. For 
example, a central memory word containing a field called QQQ has been read into 
PP memory at location fwa. The following instruction would load QQQ into the A 
register: 

LDD FWA+C.QQQ 

This symbol form is used when the specified location is either a scratch cell or a 
location used in a typical manner. 

Each of the 100g core (direct) locations within PP memory is assigned at least one 
symbolic label in the form: 



D. mn 



m 

Z 

T 

TW 

TH 

FR 

FF 

SX 

sv 



Locations 

00-07 
10-17 
20-27 
30-37 
40-47 
50-57 
60-67 
70-77 



The value of n may range from to 7. Thus location 27 is referred to as D.TW7. 
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System 

Symbols Definition 

E , x This form is used to define symbols for the BNL ECS mods.t It occurs in SCPTEXT 

and ECSCOM. 
F.x Error flag values 

!P -X Miscellaneous values which may vary each installation within certain limitations 

LE .x Length of entries within tables 

L.x Table length 

M.x Monitor functions such as values transmitted to MTR through PP resident to cause 

MTR action 

N.x Quantities 

O.x Stack processor orders (commands). These orders do not correspond to values used 

in the code and status FET field; stack processor orders are designated for ease of 
use by the stack processor. 

P. x Locations of central memory pointer words. Most such words contain initial and 

terminal addresses of tables located elsewhere in central memory. 

R.x Entry points within PP resident 

S.x Right offset of a field within a PP word (byte). The number of bit positions which 

must be right shifted to right justify the field to bit 0. Six symbols may also be used 
in the address field of the BIT macro to generate a 1-bit mask. 

T.x First word addresses of central memory tables. When a table has a pointer word, 

the address of the table should be obtained from the pointer rather than directly from 
the T.x symbol value. A pointer word has the same name as the table except that 
the identifier is P rather than T, 

W.x Equated to values representing the relative position of central memory words within 

tables. For example, if the address of a control point area is contained in the PP 
A register, the following code would obtain the word containing the job name. 

ADN W. CPJNAM 

CRD D.TO 



t The Interim ECS System was developed by Graham Campbell, Kurt Fuchel, and Sidney Heller, of 
the Brookhaven National Laboratory, Upton, New York. Work performed at Brookhaven National 
Laboratory is supported by the U.S. Atomic Energy Commission. 
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ERROR MESSAGES H 



Messages produced by the SCOPE operating system are listed below. All 
messages appearing in the system and job dayfiles are included. Most 
messages that appear on the displays are also included, but some, such as 
indications of system status which do not require operator response are 
omitted. Messages that appear at the console during the initial deadstart 
process have been omitted, except those which indicate error conditions. 

Messages are listed in alphabetical order. Items in which the first 
characters will change according to the parameters of the job in progress 
are arranged according to th© second word of the message. Items beginning 
with numbers follow the alphabetical lists, and th<j>se beginning with 
asterisks appear last. The routine that produces each message is listed on 
the right margin. 

Abbreviations that commonly appear in this section: 

CH Channel FNT/FST File name/status table 

CM Central memory MLRS Maximum logical record size 

CMR Central memory resident MT Magnetic tape 

CP Central processor unit, PF Permanent file 

or card punch PFD Permanent file directory 

ECS Extended core storage PP Peripheral processor unit 

EOF End-of-file PRU Physical record unit 

EOI End-of-inf ormation RBR Record block reservation table 

EQ Equipment RBT Record block table 

EST Equipment status table RBTC Record block table catalog 

FET File environment table 

FL Field length 
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A DOUBLE EOF WAS FOUND BEFORE A / COPYN 

A NUMERIC EXTENDS BEYOND AN END OF FILE COPYN 

A PARAMETER BEGINS BEYOND AN EOF-EOF COPYN 

A PARAMETER IS GREATER THAN 7 CHARACTERS COPYN 

ABOVE IS ILL-FORMED AND IGNORED EDITLIB 

Preceded by reproduction of the control card in question. 
EDITLIB does not abort, but proceeds to the next control 
card. Possible reasons for rejection of a control card 
are given below: 

Contains more than 30 elements (words and/or numbers). 

First element is not an EDITLIB function. 

Any other element exceeds seven characters. 

An element begins with two or more digits and contains 
a letter. 

An element which should be a name is a number. 

An element which should be a residence code is not 
CM or DS. 

On a SKIPB card, the file name is not followed by a 
number. 

On a SKIPF card, the file name is followed by an 
asterisk or dash; it should be a name or number. 

ADDRESS xxxxxxx IS UNDEFINED TRACE 

Output specification address xxxxxxx is unsatisfied, 
output for that specification is ignored. 
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AN ID(P1) IS REQUIRED ON ALL TEXT CARDS COPYN 

ARG ERROR LOC 

Last word address of area to be cleared (LOC control 
card) equals or exceeds field length, or last word 
address is less than first word address; job 
terminated. 

AUDIT ABORT - READ PAST EOR ON ORBTC AUDPP 

AUDIT routine for permanent files read end-of-record on 
record block table catalog file before RBTC entry was 
complete . 

AUTO-RECALL ERROR 1EJ 

Job terminated because completion bit was already set when 
job went into auto-recall. 



BACKUP GO WHEN CORRECTED (RESTART) 



RESTART 



Checkpoint number specified exceeds that in first leader 
record on checkpoint tape. Dayfile message requires oper- 
ator action; mount earlier checkpoint tape or rewind. 



BAD COMPARE 



COMPARE 



Displayed on console, system and job dayfile if discrepancy 
occurs during COMPARE. If fatal, operator may drop job. 



BAD FILE NAME ON REQUEST 5DA 

File name on REQUEST or REMOVE control card has bad 
format. Job terminated. 



BAD LABEL 5DA 

Unrecognizable label on disk pack read in response to 
RPACK control card or a DEVADD type-in; label with wrong 
name read in response to RPACK control card. Job terminates 
from DEVADD error; otherwise system waits for operator 
to assign another disk pack drive, assign same drive with 
different pack, or drop job. 
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BAD NAME CHECK xxx EDITLIB 

Program name xxx from input file is not same as first 

program name on ADD, ADDBCD, ADDCOS, or ADDTEXT control 

card. If source is running system library, xxx program 
not found in directory. 

BAD PACK NAME IN REQUEST 5DA 

Name on RPACK or REQUEST control card has bad format; or 
REMOVE card file name on private pack differs from param- 
eter. Job terminates. 

BAD TEXT LDR,2LA 

Illegal TEXT table entry; relocation code is illegal. 
No image is produced. 

BCD RECORD FOR ADD IS ILLEGAL EDITLIB 

EDITLIB found that the record was in BCD while trying to 
do an ADD. Either ADDBCD or ADDTEXT should be used. 

BINARY CARD READ AS FUNCTION CARD EDITLIB 

First record on input file must contain all, and only, 
control cards for EDITLIB. Card is assumed binary if 
character other than letter, digit, blank, or - . , ( ) 
/ * $ appears . 

BINARY RECORD MISSING FROM INPUT COPYN 

Logical records requested fron system INPUT file must begin 
with the next logical record on INPUT file. 

BKSP(TAPE) 1TD,1DF 

BKSP HIT EOF EDITLIB 

BLANK 1BT 

1BT was called to write blank label on tape. 

BLANK COMMON EXCEEDS AVAILABLE CORE, TRUNCATED LOADER 

During blank common allocation, no length can exceed FL or 
overlap 20-word LOADER residence. No reference is trunca- 
ted, only the allocation for core map. 
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BLANK PERMANENT FILE NAME PFC.PFA 

At least first two characters of permanent file name are 
b 1 ank . 

BLANK TAPE READ 1RS,1RT,1TF | 

Reading of blank tape caused run away. EOI status is 
returned to FET. 

BUFFER ARG ERROR 2BP 

FET address is not in field length, or buffer parameters 
are not within limitsjjob terminates. 

FET(l) + 4 + L < FL, LIMIT < FL, 
FIRST ^ IN < LIMIT, FIRST £ OUT < LIMIT. 



BUFFER PARAMETER ERROR 1SX 

Called by error code 11. Circular buffer pointers in FET 
fail to satisfy: ^ FIRST < LIMIT < FL, FIRST < IN < LIMIT, 
FIRST < OUT < LIMIT. 

C OPTION DOES NOT START WITH C LDR.2LA 

C must be first character of OVERLAY control card option 
which allows user to designate how many words above 
blank common overlay should be loaded, 

C OPTION NOT LAST PARAMETER LDR,2LA 

Termination character does not follow C option on OVERLAY 
card . 

C OPTION USED ON OVERLAY (0,0) LDR,2LA 

This option cannot be used on level 0,0 overlay card. 

CALL IGNORED, COMMON DECK NOT IN DICTIONARY EDITSYM 

*CALL,dn does not name a common deck. 
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CALLING ERROR (CKP) CKP 

Bit of param is not zero, RECALL bit is not set in call 
to CKP, or param list is outside field length. Fatal day- 
file message, job terminated. 

CANNOT CATALOG OPEN RANDOM FILE PFC 

Message is followed by logical file name. 

CANNOT COMMON P.F. 1AJ.CTS 

CANNOT COMPLETE LOAD, JOB ABORTED LOADER 

Intended to correct fatal error conditions in control card 
mode when LOADER requests LDR to load library routines. 
Since such a request appears to LDR as a user request, 
2LE, a fatal error message does not abort, but returns to 
LOADER. An error message from 2LE appears before this 
message . 

CANNOT COMPLETE THIS OVERLAY, BAD INPUT LOADER 

During overlay generation, if LDR encounters difficulty in 
loading text or tables, it produces a message such as USER 
ERROR, BAD TEXT TABLE. When LOADER attempts to complete 
the overlay, the fatal error bit (set by LDR) is detected, 
this message is output, and job is terminated. Core map 
will contain last good overlay generated. 

CANNOT EXTEND OPEN RANDOM FILE PFE 

Message is followed by logical file name. 



CANNOT LOAD TEXT INTO xxxxxx LDR 

Overlay that first declared labeled common at xxxxxx 
has already been written out. 

CANT (ADDTEXT) FROM SYSTEM EDITLIB 

ADDTEXT reads and formats records into an overlay for 
system file. This is not possible if SYSTEM is specified 
as the input file. This would require running system as 
defined by current CMR directory. A simple ADD can prob- 
ably get relevant record from SYSTEM. 
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CANT ADD WITHOUT READYING EDITLIB 

ADD, ADDBCD, ADDCOS, or ADDTEXT control cards cannot be 
executed by EDITLIB unless a file has been named by a 
preceding READY card with no intervening COMPLETE card. 

CANT ASSIGN xx 4ES 

xx = equipment type (0 for any mass storage) . Require- 
ments for device type, allocation style, or EST ordinal 
are not satisfied. Operator should type n.GO or n.DROP. 



CANT FIND DIRECTORY RECORDS ON INPUT FILE EDITLIB 

EDITLIB cannot locate records that comprise directory on 
system file (should be in two records immediately following 
DSD); presumably this is not a system file. 

CANT GET PACK ASSIGNED 1BT 

Disk pack named in a BLANK type-in is eligible to be 
blank labeled, but monitor refuses to assign pack to 
control point. Report this message to a system analyst. 

CANT GET PACK ASSIGNED TO C.P. 5DA 

Monitor refused a request to set EST status of a disk pack 
to 402n, (n is control point number). Unless system 
error occurred, system has assigned pack to another con- 
trol point. If RPACK control card was processed, system 
waits for operator to drop or re-assign job; otherwise 
j ob terminates . 

CANT LIST BETWEEN READY AND COMPLETE EDITLIB 

EDITLIB cannot list programs in a file while it or another 
file is being constructed (READY card executed more recently 
than COMPLETE card) . 

CANT MOVE WHILE READY PENDING EDITLIB 

After READY card is read, location of a program in 
running system cannot be changed by MOVE card before 
file named in READY is written out by COMPLETE card. 
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CANT SET PACK AVAILABLE 5DA 

Monitor refused request to set EST status of disk pack 
to 4000. Unless system error occurred, system assigned 
pack to another PP before DEVADD type-in was completely 
processed. Job terminates. 

CANT TRANSFER WITHOUT READYING EDITLIB 

EDITLIB can execute TRANSFER card only after file is named 
by preceding READY card with no intervening COMPLETE card. 

CANT UNLOAD PACK 5DA 

Monitor refused request to set EST status of a disk pack 
to 4040 because of system error. Job terminates. 

CANT UNLOAD PACK AFTERWARDS 1BT 

A pack was blank labeled, but monitor refuses to restore 
pack status to unloaded. Report this message to system 
analys t . 

CARD ERROR, CANNOT FIND FILE NAME LDR,2LA 

A control card call for loader does not contain a file name, 
or the file name cannot be found. 

CARD ERROR, FIELD LENGTH TOO SMALL LDR.2LA 

Control card call for loader specified inadequate field 
length . 

CARDS MISSING FROM OBJECT DECK LDR.2LA 

Word count for loader table not satisfied. Word count in 
a text table greater than 20 (octal). 
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CATALOG 4/5 FULL PFC 

Warning to the operator that the permanent file catalog 
is 80 per cent full. 

CATALOG ATTEMPT ON NON-LOCAL FILE PFC 

Message is followed by logical file name. 



CATALOG FULL, CYCLE NOT EXTENDED pp C 



CATALOG FULL, FILE NOT PERMANENT PFC 

Cycle of file specified on preceding line has not been 
made permanent because of current catalog condition. 



CHECKPOINT xxxx ON 1 f n 

Specified checkpoint completed on checkpoint dump tape; 
informative dayfile message. 



CHECKSUM ERROR IN xxxxxxxx 

During deadstart loading computed checksum of some 
physical record unit did not agree with that appended 
to PRU during preloading. Indicates trouble with the 
device identified on the display. Deadstart ceases. 



CIO CODE NOT DEFINED ON DEVICE CIO 

Either function code issued to CIO does not exist, or it 
is not applicable to present device. 
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CIO ERROR. n 



Followed immediately on console display, system and job 
dayfile by ROLLIN ABORTED. 1RI, called by type-in or 
roll in, is about to abort a job. If n = 1, QROLOUT file 
was not at control point, presumably not properly rolled 
out. If n = 2, 3, or 4, QROLOUT was at control point, 
but did not read correctly. 



1RI 



CKP FILE UNKNOWN (RST) 

FNT does not contain checkpoint file name given to RST at 
RA+4. Fatal dayfile message; job terminated. 



RST 



CKP REQUESTED 

CKP has received control from a user call 
dayfile message. 



Informative 



CKP 



CKP TAPE INVALID (RESTART) 

Tape supplied was not a checkpoint tape or it was partly 
destroyed after checkpoint was taken. Fatal dayfile 
message; job terminated. 



RESTART 



CKSUM ERROR RC.xxxx, CD.yyyy 



2RC 



Appears at beginning of OUTPUT file if input card has invalid 
checksum and no checksum suppress punch in row 4 of column 1. 
Job was terminated as soon as it was brought to a control 
point. Record number is decimal xxxx, counting first record 
(control card) in file as 0000; card number is decimal yyyy, 
counting first card of record as 0001. 



CLOSE ILLEGAL ON NON-EXISTENT FIL3 

CLOSE request was issued for a non-existent file. 
CODED INF 



CLO 



EDITLIB 
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COMMON DECK EDITING MUST PRECEDE TEXT EDITING EDITSYM 

*COMDECK control card occurred after text deck correction 
or a *DECK control card. EDITSYM run terminated. 

COMMON EQUIPMENT nn ASSIGNED 1AJ.CTS 

Local file on a non-allocat able equipment with EST ordinal 
nn has been made common. 

COMMON SECTION TOO LARGE EDITSYM 

Space available for common decks has been exceeded. 

COMPARISON ABANDONED BECAUSE OF E-O-R LEVEL COMPARE 

DIFFERENCE AFTER RECORD n FILE x LEVEL p FILE y LEVEL q 

Message appears on OUTPUT file and run ends if nth pair 
of records do not both terminate with same level end-of- 
record; level numbers are octal. 

((COMPLETE)) FINDS REC.MSG. IN FILE sssssss EDITLIB 

Fault in disk file used by EDITLIB; sssssss is a local 
file. 

CONFLICTING RECORD COUNT EXHAUSTED COMPARE 

Run ends if number specified in control card is such that 
comparison would be abandoned if a higher number of record 
pairs were in conflict. For instance, if CONFLICT IN 
RECORD n is written for five pairs of records and control 
card has no sixth parameter, run terminates after CONFLICT 
IN RECORD n has been written 30000 times. 
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CONFLICT IN RECORD n COMPARE 

nth pair of records are not identical, word-for-word. 
When one record is longer, a separate message appears. 
Depending on parameters, this message may be followed by 
a listing of some or all words which differ. For example: 
0020,00000000000000000000/00000000000000000001. The 
17th word foetal 20) of record n of first file named 
on COMPARE control card was and the corresponding word in 
the second file named is 1. First word of record 
would be 00000. Words are printed as 20 octal digits 
each. Comparison continues after message. 

CONTROL CARD ERROR COMPARE 

Console display, system and job dayfile. COMPARE 
control card contains fewer than 2 parameters or 
parameter required to be a number, implied by fewer 
than 2, contains a non-numerical character. Job 
terminated. 

CONTROL CARD ERROR COPYBCD 

Console, system and job dayfiles if parameter that 
begins with digit contains non-digit character. 

CONTROL CARD ERROR 1AJ 

COPYBF 

Job terminated; card display immediately precedes 

this message. 

CONTROL CARD ERROR, NO CKPFILE (RESTART) RESTART 

RESTART card has two numbers instead of a number and file 
name. Job terminated. 

CONTROL CARD ERROR, NUMBER ERR (RESTART) RESTART 

Checkpoint number must be unsigned decimal integer greater 
than zero. Job terminated. 
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CONTROL CARD ERROR PARAM CNT (RESTART) RESTART 

More than two parameters on RESTART card. Job terminated. 

CONTROL CARD REWIND (INPUT) IS ILLEGAL COPYN 

System INPUT cannot be rewound. 

CONTROL POINT ABORTED 1LT 

Operation error was detected and FNT was not full. 

jobnameCONTROL POINT DROPPED 1EJ 

System job named jobname was dropped and control point 
cleared in response to n.DROP. or n.KILL. 

CONTROL POINT ERROR 1 LT 

Control point error detected following storage relocations. 

CONTROL POINT IN USE ! LT 

LOAD or LOADX was called to an occupied control point. 

CONTROL POINT OCCUPIED 1DF 

Operator tried to dump dayfile from occupied control 
point; control point must be vacant (have no job name). 

COPY REQUESTED BUT NO OLD PROGRAM LIBRARY EDITSYM 

*COPY read from correction input but no old program library 
requested on EDITSYM call card. Run terminated. 

COPYBCD (DAYFILE, TAPE) 1DF 

COPYBCD (xxxxxx,TAPE) 1TD 

COPYL DID NOT FIND xxxxxxx. COPYL 

COPYL DONE COPYL 

COPYLAB INCORRECT COPYCR, COPYCF , 

COPYBR,COPYBF 
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CORE OVERFLOW 

COS 

CP xxxxxx.xxx SEC 

Central processor running time for job. 

CPnn COMPARE ERROR 

Console and system dayfile. Card punch with nn EST 
ordinal mispunched a card. Operator action not re- 
quired, as punch offsets bad card and one after it and 
repunches both cards. 

CPnn NOT READY 

Displayed on console only. Card punch unit with nn EST 
ordinal is not ready; when ready; punching begins. 



CPnn REJECT 

Displayed on console when card punch with nn EST ordinal 
rejects a function code. No operator action. 

CP 00000, 000 SEC 

CPnn XMSN PARITY ERROR 

Console and system dayfile when card punch with nn EST 
ordinal finds a function transmission parity error. No 
operator action. 



CP PROG 



UPDATE 

EDITLIE 
1EJ 



2PC 



2PC 



2PC 



1AJ 
2PC 



EDITLIB 
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CRnn CKSUM ERROR RC.xxxx, CD.yyyy 2RC 

System and job dayfiles. User local file assigned to 
reader with nn EST ordinal contains binary card with bad 
checksum and no checksum suppress punch in row 4 of column 
1. Job terminated. Record number is decimal xxxx, count- 
ing first record as 0000. Card number is decimal yyyy, 
counting first card of record as 0001. 

CRnn COMPARE ERROR 2RC 

System dayfile and console display; on display, it is 
followed by CR nn RE-READ LAST CARD. Card reader with 
nn EST ordinal misread last card in output stack and 
stopped. 



CRnn FORMAT ERROR RC.xxxx, CD.yyyy 2RC 

System and job dayfiles. User local file assigned to card 
reader with nn EST ORDINAL CONTAINS 7-9 card, presumably 
binary, with unrecognizable format, and not included in 
cards for 80-column binary reading. Job terminated. Record 
number is decimal xxxx, counting first record in the file 
as 0000; card number is decimal yyyy, counting first card 
record as 0001. 



CRnn FUNC XMSN PARITY ERROR 2RC 

Console and system dayfile. Card reader with nn EST 
ordinal found function code parity error. No operator 
action . 



CRnn H0LL. CHECK RC.xxxx, CD.yyyy 2RC 

System and job dayfiles. User local file assigned to 
card reader with nn EST ordinal contains a card without 
7-9 in column 1, presumably Hollerith, with invalid punch 
combination in at least one column. It was read as a 
blank column. Record number is decimal xxxx, counting 
first record in file as 0000; card number is decimal yyyy, 
counting first card of record as 0001, 
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CRnn MODE CHANGE RC.xxxx, CD.yyyy 

System and job dayfiles. User local file assigned to 

card reader with nn EST ordinal had mixed cards (binary, 

Hollerith, 80-column) in a single record. Record number 

is decimal xxxx, counting first record as 0000; first 
change of type occurred at card number yyyy decimal, 
counting first card as 0001. 



2RC 



CRnn NOT READY 



2RC 



Displayed on console only. Card reader with nn EST ordinal 
is not ready. When ready, cards are read. 



CRnn REJECT 



2RC 



Console and system dayfile. Card reader with nn EST 
ordinal rejected a function code. No operator action, 



CRnn RE-READ LAST CARD 



2RC 



Displayed on console when CRnn COMPARE ERROR is sent to 
system dayfile. Card reader with nn EST ordinal misread 
last card in output stack and stopped. Operator should 
back up any card waiting in the reader, back up last card 
in output stack to head of input queue, and press CLEAR 
MEMORY and START on the reader. Reading will continue. 
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CRnn RE-READ 2 CARDS, TYPE GO. 2RC. 

Follows CRnn 6681 XMSN PARITY ERROR. nn is card reader 
EST ordinal, in octal. Both messages are written on 
system dayfile, but only this one will persist on console 
display. Operator should back up the card waiting in the 
reader, move last two cards in output stack back to head 
of input queue, and type n.GO. (n is relevant control 
point number). Card reading will resume. 

CRnn SERIAL CHK,RC.xxxx, CD.yyyy 2RC 

System and job dayfiles. User local file assigned to 
card reader with nn EST ordinal has at least one binary 
card out of sequence. Record number is decimal xxxx, 
counting first record of file as 0000; position of first 
card in record is yyyy, counting first card in record as 
0001. 

CRnn 6681 XMSN PARITY ERROR 2RC 

System dayfile and console display; followed by CRnn 
RE-READ 2 CARDS, TYPE GO. Indicates a transmission 
parity error between the 6681 and card reader with 
nn EST ordinal. 

CTS CALL ON PROTECTED FILE CTS 

User tried to make COMMON a system file. Job terminated. 
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CYCLE xx, pfn LPF,LOADPF 

Permanent file pfn cycle xx is being loaded. 

CYCLE xx pfn LPF.PFC.PFE, 

PFP.PFA 
Permanent file pfn cycle number xx. If xx is **, cycle 
has not yet been determined by system or is in error. 

CYCLE HAS BEEN DUMPED PFA 

Cycle of permanent file on preceding line was dumped 
by DUMPF routine but not released. 

CYCLE INCOMPLETE PFA 

Cycle indicated on preceding line is incomplete because 
another control point is cataloging it, or a job termin- 
ated while cataloging. For the latter, initial deadstart 
required to reload all files. 

CYCLE NOT IN SYSTEM PFE,PFP,PFA 

Requested cycle of permanent file specified in preceding 
line not presently cataloged. 

CYCLE SUCCESSFULLY PURGED LPF,PFP 

Requested cycle of permanent file specified in preceding 
line has been purged; other cycles still remain. 

DAYFILE 1DF 

DAYFILE DUMPED 1DF 

DEBUG CARD OUT OF ORDER 1A J 

Issued if DEBUG card appears after TRACE or SNAP cards 
during load. Job terminated. 
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DECK DOES NOT END WITH *END EDITSYM 

Text deck ended, but no *END card appeared. Run terminated. 

DECK NOT ON OLD PROGRAM LIBRARY EDITSYM 

Deck specified by *EDIT or *COPY card is not on old 
program library. Run terminated. 

DECK STRUCTURE CHANGED UPDATE 

((DEL)) EXHAUSTS PNT BEFORE SATISFACTION EDITLIB 

*DELETE (P1-P2) card used, but P2 parameter does not appear 
after PI in program name table. 

jobname DELETED FROM QUEUE, PARITY ERROR XXXRESQ 

Parity error detected when restoring a job; job named will 
be deleted; job in question should be rerun. 

DELETION EDITSYM 

DEVICE LOST DATA 

Lost data status detected during deadstart preloading. 
Deadstart again. 

DEVICE NOT AVAILABLE 4ES 

Result of operator decision to drop a job in answer to 
CANT ASSIGN xx message. 

DEVICE REJECT 

Device rejected during deadstart preloading. Deadstart 
again . 

DIAG. SEQ. ALREADY ON. APR 

Result of console entry SEQ, ON. 

DIAG. SEQ. HAS NO SUCH JOB. APR 

Result of console entry SEQ,RUN,nn. Sequencer does not 
contain job nn. 
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DIAG. SEQ. IS ON. APR 

Result of console entry SEQ, ON. 

DIAG. SEQ. JOB nn CONTAINS CM. FST. ALS . MY1. CM6. CT3 APR 

Result of keyboard entry SEQ, LIST, nn.. None, some, or all 
diagnostics may appear in the list. 

DIGITS IS NOT OCTAL LDR.2LA 

DIRECTORY ALMOST FULL LPF 

Warning that permanent file directory is 80 percent full. 

DIRECTORY IS 4/5 FULL PFC 

Warning that the permanent file directory is 80 percent 
full. 

DIRECTORY FULL, FILE NOT PERMANENT PFC 

File specified on preceding line was not made permanent 
because directory is full. 

DIRECTORY UNDER CONSTRUCTION GETS TOO BIG - TOO MUCH EDITLIB 

CM RESIDENCE 

Directory to replace SCOPE system directory in central 
memory exceeds field length of EDITLIB control point, 
30000 (octal) words. Too many programs are assigned to 
CM residence. Trv EDITLIB again with LENGTH(n) as first 
control card; n is 4-9, for 4C000 (octal), 110000 (octal) 
words . 

DISK PARITY ERROR 

. Parity error encountered when loading from disk; 
loading terminates. 
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DOUBLE EOF WAS FOUND BEFORE A / COPYN 

Double EOF encountered before zero length record was 
copied. 

DMP ARG ERROR DMP 

Console, system and job dayfiles. Starting address for 
CM dumps greater than final address or relative to RA, 
rather than absolute, and final address greater than 
field length. 

DPF ABORT - NO ENTRY IN FNT FOR 0SD000 DPF 

Dump routine called into system that does not define 
permanent file system. 

DPF ABORT - NO RBTC ENTRY IN FNT DPF 

Dump routine called into system that does not define 
permanent file system RBTC file. 

DPF ABORT - SYSTEM ERROR NO. xx DPF 

DPF found a dump or permanent file manager system error, 
xx interpreted: 

1 Bad address for CM write. 

2 APF pointer does not point within PFD chain. 

3 Bad RBT chain word; no RB pointer after header 
information. 

4 CM write beyond LIMIT of tape buffer. 

5 PFD pointer does not point to PFD header word. 

6 RBTC pointer in PFD does not point to correct 
RBTC entry. 

DPF ABORT - UNIT SPECIFIED NON-ALLOCATAB LE DPF 

EST ordinal in dump control card points to non-al locatab le 
device. Permanent files are only on allocatable devices. 

DPF ABORT - UNIT SPECIFIED = ECS DPF 

EST ordinal specified on dump control card points to ECS. 
Permanent files cannot be assigned to ECS. 
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DPF NOT CALLED BY DUMP ROUTINE 

PP program DPF called to a control point not attached to 
DUM, dump permanent file. 



DPF 



DPF STOPPED BY SYSTEM 

Error flag on in control point area. 



DPF 



DPF STOPPED - FULL AND UNIT DUMPS RUNNING TOGETHER DPF 

Full dump conflicts with a copy of a unit dump. Unit 
dump is terminated. 

DPF STOPPED - PARITY ERROR ON DUMP TAPE DPF 

Parity error on dump tape; tape was positioned to end of 
previous file dumped. DPF called to terminate dump program. 



DUMPING pfn 

pfn is permanent file name of job being dumped. 



DUMPF 



DUMPF ABORT - 10 ERROR RETURN 

I/O error code other than parity error caused dump program 
to terminate. 



DUMPF 



DUMPF - BAD TAPE - MOUNT ANOTHER TAPE 

Parity error during OPEN. Bad tape will be unloaded by 
system. OPEN will be issued by system after operator 
mounts new tape. 



DUMPF 



DUMPF FINISHED 



DUMPF 
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DUMPF 



PARITY ERROR ON CLOSE 



DUMP RISKY 



Two attempts to close dump tape failed because of parity 
errors. Status of last file on dump tape is questionable; 
reloading of this dump tape is risky. 



DUMPF 



PARITY ERROR ON DISC PF NAME - pfn 



Disk parity error while copying permanent file pfn; 
copying continues. 



DUMPF 



DUMPF - PARITY ERR WHILE IN OWNCODE 

Dump program found a second parity error while trying to 
reposition tape back to previous file because of first 
parity error. 



DUMPF 



DUMPF SIMULATE EOT DUE TO PARITY ERROR 

Parity error on dump tape. System will issue request to 
close reel to simulate end-of-tape and issue open reel 
for new tape. Dump program will then continue to 
copy file. 



DUMPF 



DUP COMMON FILES OF xxxxxxx 



1AJ 



Local and common file in FNT named (xxxxxxx) same as on 
COMMON card. Job terminated with control card error. 



DUPLICATE CYCLE 



PFC 



Cycle of permanent file specified on preceding line already 
exists . 



DUPLICATE ENTRY POINT xxxxxxx 

DUPLICATE FILE NAME 

Job terminated because name of file at control point was 
duplicated in label of a private pack being attached as 
a result of RPACK control card or in parameter of REQUEST 
control card. 



LOADER 
5DA,REQ 



DUPLICATE FILE NAME (RESTART) 

The requested tape is already assigned to this control 
point. Job aborts. 



RESTART 
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DUPLICATE PACK NAME 5DA 

Pack name on RPACK control card same as a pack name already 
at that control point. Job terminated. 

ECS EST BAD, CANNOT CONTINUE IRCP 

ECS EST is improperly defined on deadstart tape. Deadstart 
with another tape. 

ECS PARITY ERROR 1EJ 

ECS parity error during a system storage move terminated 
job. Job may be active at a control point or in job 
initialization phase requesting storage at a control point. 



ECS PARITY, RESTART AND OFF ECS IRCP 

Parity error detected in first 100 (octal) words of ECS. 
Operator should deadstart again, OFF ECS, and continue. 
Notify customer engineer of this message. 

ECS READ ERROR (CKP) CKP 

Irrecoverable parity error or error hang encountered 
while trying to read ECS. Job terminated. 

ECS WRITE ERROR [RESTART) RESTART 

Irrecoverable parity error or error hang encountered while 
trying to write ECS. Job terminated. 

EDIT CONTROL CARD SET MUST BE FOLLOWED BY A *EDIT CARD EDITSYM 

*INSERT, *DELETE, *ADD, *CANCE1, or *REST0RE control card 
sets follow *DECK, *C0MDECK, *C0PY, *WE0R instead, of a 
*EDIT card. Run terminated. 

EDITION EDITSYM 

EDITLIB-CTS FAULT IN INITIALIZING COMMON FILES ED1TLIB 

Program fault in EDITLIB, or CTS that is not expected. 
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EDITLIB PROG. FAULT IN SUBRT.MAKE EDITLIB 

EDITLIB is trying to ADD a record which begins like a 
binary CP program, but is badly formatted. Such a 
binary program must be organized in tables, and EDITLIB 
checks organization to get entry point names. If record 
appears to end in middle of a table, this message is issued. 

EDITLIB PROGRAM FAULT I SUBRT.SQB EDITLIB 

EDITSYM CONTROL CARDS EDITSYM 

EDITSYM ERRORS EDITSYM 
Dayfile message. 

EDITSYM LIST EDITSYM 

*********END OF FILE********* EDITSYM 

EOF was read on lfn specified by a *CATALOG,lfn control 
card. 

END OF FILE IMPROPERLY READ ON INPUT FILE EDITLIB 

Transfer card directed copying one or more records from 
input file to system file. End-of-file was read before 
all records were found. 

END-OF-INFO ON FILE x AS RECORD y COMPARE 

Program compared y- 1 pairs of records from two files but 
read end-of-inf ormation on x file before specified number 
of record pairs was reached. Written on job output file, 
and run terminated. 

END OF REEL - MOUNT NEXT REEL AND TYPE GO 

Instruction to operator during deadstart preloading of 
system. 
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ENTER DATE mm/dd/yy 

Appears at deadstart time. Operator must type in 
current date in specified format before beginning 
operation . 

EOF TAPE MARK READ AT OPEN IMF 

End-of-file tape mark read while positioning logical byte 
on multifile tape. 

EOF/EOI DETECTED COPYCR, COPYCF , 

COPYBR.COPYBF 
End-of-file encountered before record count on control 
card was exhausted, or end-of-inf ormation was encountered 
before file count was exhausted. 

EOR APPEARS BEFORE *END IN *DECK ADDTION EDITSYM 

EOR read before *END in *DECK addition. Run terminated,, 



EOR REQUESTED BUT COMPILE FILE NOT REQUESTED EDITSYM 

*WEOR read, but compile file not requested on EDITSYM 
call card. Run terminated. 

EPF ABORT - NO ENTRY IN FNT FOR 0SD000 EPF 

AUDIT routine called into system that does not define 
directory header permanent file. 

EPF ABORT - NO RBTC ENTRY IN FNT EPF 

AUDIT routine called into a system that does not define 
permanent file system RBTC file. 
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EPF ABORT - NO. OF RBRS EXCEEDS RBRWD BY xx EPF 

Number of record block reservation table entries in 
system exceeds CM array size in AUDIT routine by xx 
words. CM array must be large enough to contain first 
RBR header word for each record block reservation table 
entry . 



EPF ABORT - SYSTEM ERROR NO. xx EPF 

AUDIT routine or permanent file manager system error, 
xx = 1, indicates bad address for central memory write. 



EQ xx NOT READY 2LP 

EQ xx REJECT 2LP,1SX 

(1) Card reader connect function is rejected. (2) Equip- 
ment cannot be connected. Compare xx entry with installation 
equipment select code. If possible, change equipment or unit 
select code; otherwise drop the control point. 

EQ xx RESERVED 2LP 

EQ xx XMSN PARITY ERROR 1LP,2LP 

Transmission parity error during card reader connect 
function. 

EQUIPMENT IS PHYSICALLY UNAVAILABLE REQ 

Requested equipment does not exist in system, is logically 
off, or is already assigned to this job. 

EQUIPMENT OFF - REASSIGN REQ 

All equipment of the type assigned in DEVTYPE type-in 
is off. REQ waits for new assignment. 
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ERROR CONDITION NOT CLEARED LAST REQUEST CIO 

Previous I/O operation terminated abnormally, error 
processing bit was set, but error number was not cleared 
in FET. 

ERROR IN ABS OVERLAY FILE FORMAT LDR.2LA 

Identification code of subroutine does not equal 50B. 

ERROR IN FL (IRC) 1RC 

Field length not large enough to accommodate memory dump. 
Fatal dayfile message; job terminated. 

ERROR IN LOADING LOADER LOD 

LOADER routine has been destroyed on system. 

ERROR IN PARAD (IRC) 1RC 

Address of parameter list is outside field length. Fatal 
dayfile message; job terminated. 



ERROR MODE = x. ADDRESS = xxxxxx 1EJ 

Program terminated because of address or operand error. 

If x = 0, program attempted to jump to location when address 

=0; or an attempt was made to execute an invalid instruction. 

ERROR ON TRACE OR SNAP CARD DEBUG 

Parameter errors on TRACE/SNAP card or no parameters. In 
latter case, job terminated. 



ERROR ON TRACE xxxxxxx CARD TRACE 

Error on TRACE card with xxxxxxx ID. 
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EST ORDINAL OUT OF RANGE 1BT 

EST ordinal specified by BLANK type-in exceeds table 
length . 

EST ORDINAL TOO HIGH 5DA 

EST ordinal specified by a DEVADD, UNLOAD, or ASSIGN type- 
in exceeds table length. When ASSIGN was a response to RPACK 
control card, system waits for operator to drop job or 
try another assignment. Otherwise, job terminated. 

EVICT NOT ALLOWED ON PERMANENT FILES 4ES 

EXTEND PERMISSION NOT SET FOR WRITE ON P.F. 4ES 

Correct password for receiving permission to extend 
permanent file was not on ATTACH card. 

FET LESS THAN 7 WORDS, xxxxxx 1MT 

On attempt to read or write an L tape FET at xxxxxx is 
less than 7 words. Request is terminated with message 
DEVICE CAPACITY EXCEEDED, and no data is transferred. 

FD-ALL CYCLES FULL LPF 

Full reload, no spare cycles available for this file. 
File is skipped. 

FD-CYCLE ALREADY IN PFD LPF 

Full reload-cycle already exists in system. File is 
skipped. 

FD-FILE ASSIGNED TO ANOTHER DEVICE LPF 

Full reload-allocation type not available on original 
device . 

FDB ADDRESS INVALID PFC.PFA, 

PFP,PFE 
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FET MULTI-FILE POSITION INVALID 



IMF 



Specified position number is less than first position 
number on first reel of file. 



FET OUTSIDE FL 



CIO 



Address of file environment table outside user field 
length . 



FIELD GREATER THAN 80 CHARACTERS 

Loader directive improperly implemented. 



LDR.2LA 



FIELD LENGTH NOT SUFFICIENT FOR OVERLAY GENERATION 



LOADER 



Minimum field length is 26000 (octal) for the loader 
plus sufficient additional length to accommodate loader 
tables and core map. 



FIELD IS NON NUMERIC ILLEGAL TEXT CARD 



COPYN 



FILE ALREADY AT THIS CPT 



PFA 



FILE DEVICE NOT ALLOCATABLE 



IORANDM 



Console, system and job dayfiles. IORANDM was called to 
read or write beginning of random access record; but file 
is assigned to non-al locatable equipment. Job terminated. 



FILE EXTENDED 



PFE 



Permanent file indicated on preceding line has been 
extended. 



FILE HAS BEEN ATTACHED 



PFA 



Cycle of permanent file indicated on preceding line has 
been attached. 
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FILE HAS BEEN CATALOGED AS CYCLE xx, pfn IN SD xxx PFC 

Signifies successful cataloging of a permanent file giving 
cycle, permanent file name, and subdirectory. 

FILE IN SUBDIRECTORY xxx LPF 

FILE NAME ERROR 2BP 

Name in FET does not start with a letter or all characters 
are not alphanumeric. 

FILE NAME ERROR ON EDITSYM CALL CARD EDITSYM 

Parameter error on EDITSYM call card. The first character 
must be alphabetic. Job tzrminated. 

FILE NAME NOT FOUND 1LT 

1LT did not find TAPE in the FNT; can occur only when 
external tape is used. 

FILE NAME OR SL ILLEGAL ' OVERLOG 

Bad load sequence parameter list entry. lfn = zero or 
SJ2 non-zero. 

FILE NAME TOO BIG (RESTART) RESTART 

File name on RESTART card exceeds seven characters. Fatal 
dayfile message; job terminated. 

FILE NAME ON UPDATE CARD GR 7 CHAR, UPDATE ABORTED UPDATE 

FILE NOT FOUND 

System cannot find file specified in ENPR or EVICT type-in. 

FILE NOT IN SYSTEM PFA 

Permanent file specified on the preceding line not known 
to system. 

FILE NOT IN USERS FL CTS 

Address of request word is outside user's field length. Job 
terminated . 

FILE NOT ON MASS STORAGE DEVICE pfn PFC 
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FILE NOT ON PRIVATE PACK 5DA 

A REMOVE control card named a file at control point, but 
file was not assigned to a private pack. Job terminated. 

FILE NOT OPEN FOR WRITE CIO 

Write attempted on a file opened for READ ONLY. 

FILE x RECORD y HAS PHYS . REC. LONGER THAN 1024 WORDS COMPARE 

Appears on job output file. Run ends when record y on 
file x contains too long PRU. Condition is detected by 
a PP program (not by COMPARE) . Limit accepted by PP 
program is probably 512 words; but COMPARE buffer limit 
is 10 24 words . 

FILE xxxxxx RECORD xxxxxx HAS PHYS. REC. LONGER THAN COMPARE 

1024 WORDS 

FILE RECORDS NOT NAMED IORANDM 

Console, system and job dayfiles. IORANDM called to read 
or write beginning of random access record, identified by 
record name. If record was first written by number it must 
be addressed by number. Job terminated. 

FILE SUCCESSFULLY PURGED PFD 

Last cycle of a file has been purged. 



FILE VACUOUS LDR.2LA 

Input file initially positioned at EOF mark. Job terminated. 
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FIXED PRIORITY JOB jobname WAITING FOR STORAGE IRA 

Storage not sufficient to bring this job to control 
point. Message appears on B display at a NEXT control 
point . 

FL TOO SMALL FOR LOADER LOD 

A minimum of about 4000 (octal) CM words is required for 
CM LOADER and a small relocatable program. 

FNT FULL 1E J 

Output file cannot be created as FNT is full. Loop 
will continue until empty entry is found. 

FNT IS FULL REQ 

REQ cannot assign requested file, as FNT is full. It 
will loop until it finds an empty entry. 

FNT NAME ERROR (IRC) IRC 

Memory dump file name not correct. Fatal dayfile message; 
job terminated. 

FORMAT ERROR RC.xxxx, CD.yyyy 2RC 

Appears at beginning of job output if a 7-9 card, presumably 
binary, has no recognizable format and is not included in a 
group of cards for 80- column binary reading. Job termin- 
ated as soon as it was brought to a control point. Record 
number in input file is decimal xxxx, counting first (control 
card) record as 0000; the card number is decimal yyyy , count- 
ing first card of record as 0001. 

FORMATS INC0MPATIBLE***C0PY UNCERTAIN*** COPYCR, C0PYCF , 

C0PYBR,C0PYBF 
Tape formats selected for input/output files can cause 
a possible loss of data significance. Job continues. 

FOURTH PARAMETER SHOULD BE "B" OR "C" SKIPF, 

SKIPB 
Control card did not indicate B for binary or C for coded 
file. 
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FWA-LWA ERROR 10 

Console, system and job dayfile. READIN or WRITOUT 
macro is being executed; workspace, according to sixth 
word of FET, has a negative length. Job terminated. 

GOOD COMPARE COMPARE 

Console display, system and job dayfiles just before run 
ends. COMPARE executed with no discrepancies found. 

HDR REC MISSING ON FILE INCORRECTLY POSITIONED 1MR 

Labeled tape file missing header or file may be improperly 
positioned to call OPEN. 

HOLL. CHECK RC.xxxx, CD.yyyy 2RC 

Appears at the beginning of job output file if an input 
card did not contain 7-9 in column 1 and at least one 
column contained an invalid punch combination. Record 
number is decimal xxxx, counting first (control card) 
record as 0000; card number is decimal yyyy, counting 
first card of record as 0001. 

| 10 NAME NOT IN INPUT FILES SEARCHED C0PYN 

Either PI or P2 cannot be located by the C0PYN routine. 



ILLEGAL ADDRESS REQUEST TO APR APR 

The address xxxxxx in an APR S or APR 10 call is 

out of range for the control point. APR will abort 

the control point. 

ILLEGAL COPYL PARAMETER COPYL 

ILLEGAL DEVICE TYPE SPECIFIED OPE 

Specified device not found in table of valid types. 
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ILLEGAL DIAG. SEQ. PARAMETER APR 

Diagnostic sequencer received unacceptable parameter for 
console entry or program call card. 

ILLEGAL ENTRY 

Execution of command typed is illegal. 

ILLEGAL EOF EDITSYM 

EOF appears before EOR in common section. Run terminated. 

ILLEGAL EOR OR EOF EDITSYM 

EOR or EOF appears before *END in copying a deck. Run 
terminated. 

ILLEGAL EQUIPMENT REQUEST IDF 

Operator did not request MT, CP, or LP on a request to 
dump day f i le . 

ILLEGAL FILE NAME CIO 

File name has embedded blanks, does not begin with 
alphanumeric character, or is longer than 7 characters. 

ILLEGAL FUNCTION LFN CLO 

Function code in FET is not processed by CLO. 

ILLEGAL FUNCTION CODE CIO 

Function code in FET not allowed for assigned device, file 
is closed, or a read was requested immediately following a 
write on a sequential device. 

ILLEGAL LEVEL NUMBER SKIPF.SKIPB 

ILLEGAL PARAM OPTION COPYCR, COPYCF , 

COPYBR,COPYBF 
Illegal parameter on *COPYLAB control card. 
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ILLEGAL PRU COUNT AT OPEN REEL OPE 

PRU count not zero or minus at call to OPEN REEL rewind. 

ILLEGAL RECATALGG ATTEMPT pfn PFC 

File specified is already permanent, 

ILLEGAL REQ FUNCTION REQ 

The REQ routine was called by a central program without 
auto-recall, with a non-zero status, or with an EST 
ordinal not in range of EST table. 

ILLEGAL REQUEST 4ES 

1. Function code is illegal on allocatable device. 

2. Erroneous disk address specified for a random read. 

3. Read with release issued on a random file. 

4. Device type is unrecognizable. 

ILLEGAL REQUEST FUNCTION (RESTART) RESTART 

An error occurred when RESTART attempted to request a 
t ape . Job aborts . 

ILLEGAL SEQUENCE NUMBER ON EDITSYM CONTROL CARD EDITSYM 

Sequence number contains alphabetic or special character. 

ILLEGAL TERMINATOR IDF 

Operator did not use period to end dayfile dump request. 



IMPROPER UPDATE PARAMETER, UPDATE ABORTED UPDATE 

INCORRECT DUMP TAPE MOUNTED LOADPF 

INCORRECT IDENTIFIER, START OVER IRCP 

Message to operator during ECS deadstart. 
INCORRECT OPERATOR ACTION 
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INCORRECT OPERATOR ASSIGNMENT REQ 

Assigned equipment does not match type requested; operator 
should re-assign correct type. 

INDEX ADDRESS NOT SPECIFIED ON RANDOM FILE OPE 

INDEX ADDRESS NOT IN FIELD LENGTH OPE 

INDEX BUFFER PARAMETER ERROR CLO 

FET index address not specified, or outside user field 
length, or FET not long enough. CLOSE request for 
random file could not be processed. 

INDEX FULL AT OPEN OPE 

INDEX LENGTH + INDEX ADDRESS .GT. FL OPE 

INPUT FILE ENDED BEFORE ((ADD)) CARD SATISFIED EDITLIB 

EDITLIB is trying to execute ADD, ADDBCD, ADDCOS, or 
ADDTEXT; input file ended before last or only program 
named in control card was found. 

INPUT FILE ENDED PREMATURELY EDITSYM 

EOR appears before *END in a *COMDECK addition. Run 
terminated. 

INPUT REC. FOR ((ADDBCD)) HAS IMPROPER NAME CARD EDITLIB 

EDITLIB is trying to add record to system file. Input 
record does not begin with Hollerith card containing 
record name starting in column 1, or the name is not 
acceptable . 

INPUT REC. MISPREFIXED FOR ((TRANSFER)) EDITLIB 

EDITLIB is trying to copy records from input file to new 
system file. TRANSFER card specified program name and 
input record had no prefix or a prefix contained different 
name, or control card did not specify a program name but 
input record did have prefix. 
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INSUFFICIENT FIELD LENGTH 1AJ 

A program call card initiated the load of a 0,0 overlay, 
but there was not enough field length to load it. The 
job is terminated. 

INVALID CYCLE PFC,PFA 

Cycle number requested for permanent file specified in 
previous line is invalid. 

INVALID CHARACTER LDR.2LA 

Illegal character on a loader directive card. 

INVALID CONTROL CARD LOD 

Program call card for a PP program did not meet all 
requirements. Program name must begin with letter, 
cannot exceed three characters; no more than two 
parameters allowed. 

INVALID DEVICE TYPE FOR OPEN ALTER OPE 

Non-al locatabl e device type specified. 

INVALID DEVICE TYPE FOR OPEN READ OPE 

Used for line printer, card punch, etc. 

INVALID DEVICE TYPE FOR OPEN WRITE OPE 

Used for card reader. 

INVALID FET ADDRESS Nxxxx 2CA 
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INVALID L CHAR COPYCR , COPYCF , 

COPYBR.COPYBF 

Fourth parameter on a copy control card can be L only; 
signifies presence of a label card. 



INVALID LOADER DIRECTIVE PFC.PFA 

First seven characters on a loader directive card do not 
match any of following: SEGZERO, SECTION, SEGMENT, OVERLAY. 



INVALID OPEN PARAMETER pE 

Z parameter not recognizable. 

INVALID OVERLAY - LEVEL OR FWA 1AJ 

Program call card initiated overlay load not of level 
0,0 or first word address was not lOO(octal). Job 
t e rminat ed . 

INVALID PRIVACY PROCEDURE PFC.PFA 

INVALID RECORD READ 1MF 

Invalid record where label was expected while positioning 
multifile tape. 

INVALID REQUEST TO CPC CPC 

Bits 54-59 of request word are 0, so it cannot contain 
PP program name in bits 42-59. Bits 42-59 can contain 
only number below 00010 (octal) as part of file action 
macro. Console, system and job dayfiles. Job terminated. 

INVALID STACK ENTRY lsx 

Called by error code 22 (octal). Request stack entry 

contains an undefined order code or an out-of-range RBT 

address, or points to an FNT/FST that contains an out- 
of-range RBT address. 
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I/O ERROR (CKP) CKP 

An I/O error other than redundant OPEN or CLOSE on any 
file. Fatal dayfile message; job is terminated. 

I/O ERROR (IRC) 1RC 

Any I/O error on any file. Fatal dayfile message; job 
is aborted. 



I/O ERROR 
DEVICE REJECT 

During deadstart loading a device reject occurred while 
reading from device identified on display. Deadstart 
ceases . 



I/O ERROR 

PARITY ERROR OR LOST DATA 

During deadstart loading, parity error or lost data 
error occurred while reading from device identified on 
the display. Deadstart ceases. 

I/O ERROR 

RMS DRIVER OVERLAY NOT FOUND 

Driver overlay for device identified on display could 
not be found during deadstart Loading. Deadstart ceases. 

JOB CARD ERROR 1EJ 

Job terminated because of incorrect job card; 20 characters 
from card are displayed after message. 

JOB HUNG IN AUTO-RECALL 1EJ 

This job terminated because completion bit was not set 
and there was no activity at control point. 
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JOB KILLED 1EJ 

The operator typed in n.KILL. for the job. This message 
will appear only in the system dayfile since the output 
file for the job is dropped. 

JOB PRE-ABORTED 2RC,1EJ 

Appears at beginning of job output file if input card 
caused CHSUM ERROR RC.xxxx, CD.yyyy or FORMAT ERROR 
RC.xxxx, CD.yyyy. Job terminated when brought to control 
point . 

JOB RERUN 1EJ 

Appears in first of two dayfiles for a job rerun (operator 
typed in n. RERUN.) 

JOB WAS RERUN IRA 

Message appears in second dayfile of job rerun by operator. 
LABEL MISSING ON DECLARED LABELED TAPE UNIT xx 1MR 

LABELED TAPE NOT DECLARED ON MULTIFILE OPE 

Multifile request entry did not contain label parameter. 

LEVEL NUMBER GREATER THAN 17B or 15D SKIPF,SKIPB 

Third parameter on a skip control card exceeded 17 (octal) 
or 15 ( de cimal ) . 

LEVELS NOT PERMITTED IN STANDARD CALL LOADER 

If S and V bits are not ON in user call, load is interpreted 
as normal. If LI and L2 are nonzero, it may have been over- 
lay or segment call but appropriate bit is missing. Processing 
continues as for normal load. 

LFN ALREADY IN USE PFA 

Logical file name on next message line is already in use 
at this control point. 
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LFN GREATER THAN 7 CHARACTERS SKIPF,SKIPB 

Logical file name parameter of a skip control card is too long. 

LIST OF PROGRAMS IN FILE EDITLIB 

LOAD 1LT 

1LT called to load jobs from standard SCOPE 3 tape. 

| LOADER BY THIS NAME NOT IN SYSTEM. 1AJ 

User request or control card selected loader but format 
or name was illegal. 

LOADER CONTROL CARD OUT OF SEQUENCE LOD 

NOGO or EXECUTE card before LOAD card. 

LOADER NOT FOUND IN LIBRARY LOD 

CM LOADER not found in library directory. 

LOADER TABLES GARBAGE, OR OVERLAY SEQ ERROR LOADER 

LOADER tables are threaded in a list below LOADER in CM. 
If tables are destroyed by user program (in normal mode 
only) and job terminates or secondary overlay is attempted 
without first generating corresponding primary overlay (of 
zero level), THREAD routine cannot execute properly. 

LOADER, xxxx ERROR FLAG SET. LDR,2LA 

Precedes all error messages issued by LDR or 2LA. (2LE 
overlay is called to issue message). xxxx is FATAL or 
NON-FATAL. 

LOADPF ABORTED - SYSTEM ERROR xx LOADPF 

LOADPF 

LOADPF FINISHED 
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LOADX 

1LT called to load jobs from external tape 



LOC ARG ERROR 

Incorrect parameter, such as last 
than field length. 

LOD SYSTEM WAIT 



word address greater 



To load LOADER from disk, LOD references FNT/FST entry 
for file SYSTEM (SSSSSSU if LOADER was modified by 
EDITLIB). If SYSTEM or SSSSSSU is associated with con- 
trol point other than zero, EDITLIB is modifying system. 
LOD displays message and pauses until file returns to 
control point zero. This message can occur only when CM 
LOADER is disk resident. 



1LT 



LOC 



LOD 
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I.OD CANNOT FIND SYSTEM IN FNT LOD 

If program declares SYSTEM as common file, control point 
assignment of SYSTEM changes. LOD uses the FNT for SYSTEM 
when CM LOADER is read from disk. To determine a match 
with correct FNT entry, entry association with control 
point zero is verified. 

LOST FILE (CY1) CY1 

FNT entry not defined by RESTART. Fatal dayfile message; 
job terminated. 

LP nn NOT READY 2LP 

Displayed on console when printer nn EST ordinal is not 
ready. When it becomes ready, printing will continue. 

LP nn REJECT 2LP 

Displayed on console when printer with nn EST ordinal 
rejects function code. No operator action. 

LP nn XMSN PARITY ERROR 2LP 

Console and system dayfile when printer with nn EST 
ordinal shows transmission parity error; no operator 
action. For local file, message also appears in job 
dayfile . 

LPF ABORT - BAD ADDRESS LPF 

Address specified outside user field length. 

LPF ABORT - NO ENTRY IN FNT FOR Oxxxx LPF 

Subdirectory xxxx or RBTC xxxx had no entry in file name 
t ab 1 e . 

LPF ABORT - NO RBTC SPACE LPF 

LPF FINDS NO FNT SPACE LPF 

LPF - FINISHED LOADING LPF 
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LPF STOPPED BY SYSTEM LPF 

Operator should drop job. 

L.SEQ LESS THAN 2CM WORDS APR 

Diagnostic sequencer lacks sufficient table space in CM. 

MDF NOT MASS STORAGE (IRC) IRC 

Memory dump file not mass storage. Fatal dayfile message; 
job terminated. 

MEM ARC ERROR STATUS ALREADY COMPLETE MEM 

Request made to MEM when completion bit was set in status 
word. 

MESSAGE ARG ERROR MSG 

Address given to MSG is out of user's field length. 
Job terminated. 

MESSAGE FORMAT ERROR MSG 

Character in message is 60 (octal) or over. Job terminated. 

MESSAGE LIMIT MSG 

Number of messages issued by job exceeds installation 
maximum. Job terminated. 

MF DISPOSITION OF UNLABELED TAPE REQ 

REQUEST card specifies multifile disposition of unlabeled 
tape . 
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MODE CHANGE RC.xxxx, CD.yyyy 2RC 

Appears at beginning of output file for job if input record 
contained cards of mixed format (binary, Hollerith, 80-column). 
Record number is decimal xxxx, counting first (control card) 
record of file as 0000; card number at which first change 
occurred is decimal yyyy, counting first card as 0001. 

MLRS CHANGED TO MAX BUFFER SIZE, xxxxxx 1MT 

File with FET at xxxxxx contains zero MLRS field. This 
field was replaced with maximum buffer size for that 
file. 

MODIFY PERMISSION NOT SET FOR RE-WRITE ON P.F. 4ES 

Permanent file cannot be modified because correct password 
was not given on the ATTACH card. Job terminated. 

MOUNT REEL SHOWN ON UNIT xx IMF 

MOVE ROUTINE FINDS CANT READ PROG. IN SYSTEM FILE EDITLIB 

Fault in disk file used by EDITLIB (not expected to occur). 

MT xx BLANK TAPE READ 1TF 

Appears if no data is received from the channel after 
one second; exit procedures are performed. 

MT xx ENTER VISUAL REEL NO. ON UNIT xx 4LB 

Operator should respond with n .VRN , xxxxxx . Sticker 
number pasted on tape reel. 

MT xx EOT CLO 

Processing on magnetic tape xx is terminated because of 
end-of-reel condition or CLOSER request. 

MT xx FET TOO SHORT IRS 

FET is less than 7 words on attempt to read S tape. 
Request is terminated with status DEVICE CAPACITY 
EXCEEDED and no data is transferred. 
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MT xx FILE POSITION UNCERTAIN 1PE 

During write parity error recovery, tape backed to 
position which may destroy last good record written. 
Operator may drop job, or may type n.GO. and WPE recovery 
will proceed as though file were positioned properly. 

MT xx LABEL INFO ERR IN FET 4LB 

Numeric field in 33 label area of FET contains non-numeric 
data. 

MT xx LABEL PARITY ERROR 4LB 

Irrecoverable parity error while trying to read tape label. 

MT xx LABEL UNRECOGNIZABLE CLO 

Trailer label of MT xx is not E0F1 or E0V1 as expected. 
Operator action requested by additional message. 

MT xx MLRS INVALID, 512 USED IRS 

MLRS field in FET word 7 exceeds device capacity; processing 
continues with capacity assumed (for execution) as the MLRS. 

MT xx NO WRITE ENABLE 4LB,1WX, 

1WI.1WS 
Message displayed until ring is inserted or job is dropped. 

MT xx NOT READY 4LB,1TF,2TB, | 

1RT, 1RS.1WI, 
Message displayed until unit is readied or job is 1WX,1WS,1PE 

dropped. 

MT xx PARITY ERROR 1RT.1RS 

Read parity error irrecoverable; to continue type n.GO. or 
terminate with n.DROP. 
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MT xx POSSIBLE RECORD FRAGMENT 



1PE 



Completing WPE recovery may leave data fragment greater 
than noise record. Operator may drop the job or type 
n.GO. If job is continued, attempt to recover WPE will 
continue as though file were positioned properly. 



|MT xx REJECT 



Tape unit xx cannot be connected. Compare xx entry with 
installation equipment select code. If possible, change 
equipment or unit select code; otherwise type n.DROP. 



4LB, 1TF.2TB, 
1RT, 1RS.1WI, 
1WX, 1WS, 1PE 



MT xx RESERVED 4LB,1RT,1RS, 

1WI, 1WS.1WX, 
| Displayed until condition is corrected or job is dropped 1TF 
if attempt is made to connect to tape xx reserved by another 
channel . 



MT xx WPE BAD SPOT 



1PE 



Record was written successfully following skip bad spot, 
but parity error occurred in re-reading record preceding 
the skip bad spot. Operator may drop job, or type n.GO., 
and job will continue, but record with parity error will 
not be rewritten. 



MT xx WPE RECOVERED 



1PE 



Write parity error encountered and recovered; job 
cont inues . 



MT xx WPE UNRECOVERED 

Write parity error could not be corrected by erasing and 
rewriting. Operator can continue or drop job. 



1PE 



MT xx WPE WRITE FILE MARK ERROR 



1PE 



Unable to write file mark on external tape, 
Operator can type n.GO. or drop job. 
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MT xx XMSN PARITY ERROR 4LB,1TF, I 

2TB, 1RT, IRS , 
Transmission parity error in 6681 data channel converter. 1WI,1WS,1WX 



MT xx labl BLOCK COUNT SHOULD BE xxxxxx, is xxxxxx. 4LB 

Number of physical records written on tape with label 
identifier labl does not agree with number read. 

MT xx labl CREATION DATE SHOULD BE xxxxxx, is xxxxxx. 4LB 

Label labl does not contain specified creation date. First 
xxxxxx obtained from central memory; second xxxxxx from 
label. Operator may type in n.RECHECK. or n.GO. or n.DROP. 

MT xx labl EDITION NUMBER SHOULD BE xx, IS xx. 4LB 

Tape label labl does not contain expected expiration date. 
First number is from FET, the second from label. Operator 
may provide another tape and type in n.RECHECK. or n.GO. or 
n.DROP. 

MT xx labl EXPIRATION DATE SHOULD BE xxxxx, IS xxxxx. 4LB 

Tape label labl does not contain expected expiration date. 
First xxxxx is from FET; second is from tape label. 
Operator may accept tape by typing n.GO. He may mount 
a different tape and type n.RECHECK. or he may drop 
the job by typing n.DROP. 

MT xx labl FILENAME READ WAS xxxx...xx 4LB 

xxxx. . .xx is label name of first file of label identified 
as labl. 

MT xx labl FILE NAME SHOULD BE xxx...xx, IS xxx...xx. 4LB 

File name error in label identified as labl. First 20 
characters are FET file name and second set are tape label's 
file name entry; n.GO. or n.DROP, or n.RECHECK. may be typed. 
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MTxx CHxx 1MT 

NOT READY 

Operator should make unit ready or drop job. 

MTxx CHxx 1MT 

PARITY ERROR 

Irrecoverable parity error while writing L tape. 
Operator can continue or drop job. 

MTxx CHxx 1MT 

READ PARITY ERROR 

Irrecoverable parity error while reading L tape. 
Operator can continue or drop job. 

MTxx, CHxx 1MT 

RESERVED 

Magnetic tape xx is reserved by another channel. 
Message persists until condition is corrected or 
operator drops job. 

MT xx CHxx 1MT 

WPE RECOVERED 

Write parity error encountered and recovered. 

MTxx CHxx 1MT 

XMSN PARITY ERROR 

Transmission parity error on 6681 or 6684 data channel 
converter on channel xx. 



MTR DEAD 

Monitor did not respond to a monitor function issued 
by DSD. Notify a system analyst of this message. 
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MULTI-FILE DISPOSITION ON UNLABELED FILE REQ 

Multi-file disposition should occur only on labeled 
files. 

MULTIPLY DEFINED OUTPUT xxxxxxx LDR 

LDR loaded this routine previously and cannot load it 
again . 

N EQUAL INVALID CHAR COPYCR , COPYCF , 

COPYBR,COPYBF 
Number of records/ fi les to be copied is zero, a letter, 
or special character on the copy control card. 

NAME GREATER THAN 7 CHARACTERS LDR.2LA 

Name on a loader directive card is too large. (Usually 
caused by assembly or compilation errors.) 

NEW ECS FE TOO SMALL, REQUEST xxxx (RESTART) RESTART 

The ECS field length at restart time must be greater than or 
equal to that at checkpoint time. xxxx is the minimum field 
length, /1000 (octal), which should be on the restart job 
card . 

NEXT 1EJ 

Job name at a control point waiting for a job. 

NEXT .CONTROL POINT CLEARED 1EJ 

Appears in system dayfile when NEXT control point is 
cleared because the clear flag was set. 

NO aa AVAILABLE 

Job is waiting for equipment. Operator should turn on 
equipment of allocation style aa. If equipment is 
logically off but operative, type ONxx; xx is EST 
ordinal. If equipment is available but assigned to 
another control point, job must wait until equipment 
is released. 

NO CORRECT PASSWORDS SUBMITTED PFA 
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NO CHECKPOINT TAKEN CKP,1RC 

No checkpoint dump because job is: rolled out, 
RESPOND job, uses ECS, or uses READ-RELEASE. 
Informative dayfile message. 

NO E OR N ON CONTROL CARD 5DA 

RPACK control card does not specify E or N parameter 
for operator assignment of private disk pack. Job 
terminated. 

NO EOR,EOF, OR EOI LOADPF 

End-of-record, end-of-file, or end-of-informat ion is 
missing. Loading terminates. 

NO EQUIPMENT AVAILABLE WITH ALLOCATION TYPE FOR FILE LPF 

File is skipped. 

NO EXTEND PERMISSION PFE 

NO FNT SPACE 2BP 

UP parameter in FET is zero and no space is available 
in FNT to create requested entry; job terminated. If 
UP is nonzero, FNT full code (24) is returned to FET. 

NO INDEX POINTER IN FET, OR LGTH. INDEX IORANDM 

Put on the console display, system dayfile and job day- 
file. IORANDM has been called by a READIN or WRITOUT 
macro to read or write the beginning of a randomly 
located record. But the FET is either too short to 
contain pointers to the record index or apparently 
points to an index of length zero. The job is aborted. 
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NO INPUT FILE ON THE COPYN CONTROL CARD COPYN 

At least one input file must be specified in the COPYN 
card. 

NO OUTPUT FILE ON THE COPYN CONTROL CARD COPYN 

An output file must be specified in the COPYN control 
card. 

NO PERMISSION GRANTED PFA 

NO PERMISSION TO ADD CYCLE PFC 

NO PERMISSION TO PURGE PFP 

NO PF DEVICE PFA, PFC, 

PFE.PFP 

Installation error. Report this message to a system 
analyst . 

NO PFM ACTION, WHILE UTILITY RUNS PFA, PFC, 

PFE,PFP 

NO PRIVACY PROCEDURE PFA 

No privacy procedure specified on ATTACH, when 
required. 

NO PROGRAM LIBRARY INPUT TO BE EDITED EDITSYM 

Correction input encountered but no old program library 
specified on EDITSYM control card. Run terminated. 

NO PROGRAMS FOUND FOR SEGMENT LOADER 

Not one program requested by user call could be found. 



NO RBR FOR THIS PACK 5DA 

The system cannot find RBR for disk pack EST ordinal 
referenced in an ASSIGN, DEVADD, or UNLOAD type-in. 
Report this message to a system analyst. 
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NO RBR TABLE FOR PACK 1BT 

Disk pack named by BLANK type-in is on and unloaded, 
but it does not have RBR table in central memory. 
Report this message to a system analyst. 

NO READY EDITLIB 

A READY card did not precede this control card. 

NO REQUEST ENTRY OPE 

No request entry was made for file with device type 240 
(no FNT entry). 

NO REQUEST ENTRY FOR MULTIFILE OPE 

No request entry was made for specified multifile name 
(no FNT entry). 

NO ROOM FOR NEW CYCLE PFC 

Not possible to add new cycle to permanent file speci- 
fied in previous line. 

NO ROOM IN INDEX FOR NEW NAME IORANDM 

Console, system and job dayfiles. WRITOUT macro called 
to write beginning of random access record named. 
Name is not in file index and no vacant slot is 
available. Job terminated. 

NO SUCH FILE NAME 5DA 

REQUEST or REMOVE card names a private pack that is not 
at control point. Job terminated. 
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NO SUCH PRIVATE PACK 5DA 

This message is sent to the dayfile by 1AJ when a 

REQUEST or REMOVE card names a private pack that 

is not at the control point. The job is terminated. 

NO TERMINATION FOUND LDR,2LA 

Sent to dayfile when loader directive card is not 
terminated by period or right parenthesis. 

NO TRANSFER ADDRESS LOADER 

At completion of load, no program provides a transfer 
address. Error condition is overridden by NOGO. card 
or EXECUTE, ent. card. Job terminates. 

NO WORD PAIRS ASSIGNED PFC 

NON-EXISTENT RBR REQUESTED 1SX 

Called by error code 05. RBR pointer in RBT is greater 
than number of RBR's in system. 

NON-PERMANENT FILE CANNOT BE EXTENDED PFE 

lfn 

File with name lfn is not permanent file. 

NOT AVAILABLE 

Equipment indicated by ASSIGN type-in is off, already 
assigned, or does not exist. 

NOT DISK PACK 5DA 

DEVADD, UNLOAD, or ASSIGN type-in specified EST ordinal 
which is not disk pack. For ASSIGN in response to 
RPACK control card, system waits for operator to drop 
the job or try another assignment. Otherwise, job 
terminated. 

NOT DISK PACK, OR OFF 1BT 

Equipment named by BLANK type-in cannot be blank labeled 
because it is not disk pack or it is off to system. 
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NUMBER OF RECORDS GREATER THAN 777777B SKIPF.SKIPB 

Second parameter of a skip control card exceeded 
maximum number of allowable records. 

ONE OR MORE OVERLAPPING CORRECTIONS UPDATE 

ONLY 1 OVERLAY DESIGNATOR USED LDR.2LA 

Overlay card does not specify both primary and 
secondary levels. 

ONLY ONE PARAMETER LDR.2LA 

Overlay loader directive has only one level parameter. 

OPEN REEL CALLED ON UNOPENED OR CLOSE FILE OPE 

File must have been opened before OPEN REEL call. 
OPERATOR DROP 1EJ 

The operator typed in n.DROP. to terminate job. 

OVERLAY EDITLIB 

OVERLAY CALL FROM RELOCATABLE LOADER 

Relocatable program called for overlay load. Redundancy 
check to validate user call is illegal; once overlay 
loading is initiated, control is taken from user call 
and returned to called overlay. If file named in user 
call contains all absolute overlays and OVERLAY 0,0 
has not been called, control will return to the user 
cal 1 . 

P.F. DEVICE DOWN PFA.PFC, 

PFE.PFP 
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P.F. NAME ALREADY IN SYSTEM p FC 

Permanent file indicated on previous line already exists 
in system. 

PACK FILE COUNT ALREADY 5DA 

In response to REMOVE control card (with or without 
pname parameter) file was removed from private pack; 
however, when system tried to reduce file count in 
the FNT entry, count was already zero. Job 
terminated . 

PACK LABEL NOT BLANK 5DA 

Private disk pack label read should have been blank. 
If in response to DEVADD type-in, job terminates. 
Otherwise, system waits for operator to drop job or 
try another assignment. 

PACK NOT PUBLIC AND EMPTY 5DA 

Only disk packs with an EST status of 4000 can be 
unloaded by an UNLOAD type-in. Job terminated. 

PACK STATUS NOT UNLOADED 1 BT 

BLANK type-in named disk pack that is on and in 

use as a public or private pack; therefore, it cannot 

be logically unloaded. 

PACKED CARD LONGER THAN 13 WORDS EDITSYM 

Input error; run terminated. 

PAGE NO. EDITSYM 

PARAM LIST TOO LONG (CKP) CKP 

The value of n in the user parameter exceeds 42 
(decimal). Job terminated. 
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WAITING FOR XX _ REQ 

Requested equipment is logically off; operator should 
turn equipment on or drop job. 

WAITING FOR STORAGE 1BT,RST, 

1RI,RFL 
Occurs if MTR does not immediately grant request for 
ECS or CM storage. PP enters recall. Required storage 
not available. Job waits. Operator can create space 
by rolling out another job. 

WAITING - RBT STORG 1SX 

No empty chain members exist. 

WAITING ON STORAGE LDR 

During program loading from tape, LDR request for 
additional storage has not been fulfilled. 

WAITING PFM IDLE DPF 

DPF waiting for all permanent file activity to cease 
before dump execution begins. On B display only. 

WARNING BLANK COMMON GREATER THAN PREVIOUS DECL LOADER 

Subsequent references to blank common in a set of pro- 
grams (segment, overlay, or a file loaded as a result of 
control card) cannot exceed first allocation. Job 
does not terminate; however, as no reference to blank 
common is truncated, it is possible for a program to 
destroy itself. 
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WARNING NO MATCHING ENTRY FOR XFER LOADER 

When nonzero or nonblank entry point occurs in XFER 
table, all available entries in LQADER table are 
searched. If this warning results from EXECUTIVE 
or PROGRAM CALL card job is terminated; otherwise, 
nonfatal error bit is returned to user. 

WPE UNRECOVERED. EOT FORCED, TYPE GO xxxDMPQ 

Permanent write error. Typing n.GO. will force EOT 
on bad reel and continuation reel will be assigned. 
Both reels must be read back in when queue is restored. 

WRONG TAPE, GO WHEN CORRECTED (RESTART) RESTART 

Name on checkpoint tape leader record does not match 
name on RESTART card. Dayfile message requires 
operator action. 

WRONG VRNO 5DA 

Type-in response to RPACK control card specified correct 
pack name but wrong visual identification number. 
System waits for operator to drop job or try another 
assignment. 

xx ASSD. 5DA 

xx BLANKED 

xxxxxxx CONTROL POINT DROPPED 1EJ 

The system job named xxxxxxx was dropped and the 
control point cleared as a result of the oper- 
ator entering n.DROP or n.KILL. 

xxxx KILLED MTR MTR 

xxx NOT IN PPLIB PP RESIDENT 

Resident called to load overlay not named in library. 
Job terminated. 

xx NOT READY REQ 
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xx RESERVED RE Q 

xx XMSN PARITY ERROR RE Q 

1MT ARG ERROR 1MT 

Routine for reading and writing L TAPES WAS LOADED WITH 
illegal function code, or function code it cannot 
process . 

1ST OVERLAY CARD HAS NO FILE NAME LDR.2LA 

First character of first parameter on initial overlay 
card is not alphabetic. 

1ST OVERLAY CARD LACKS 0,0 LDR,2LA 

First overlay card does not designate level (0,0) 
overlay. 

1ST PARAMETER MAY NOT EQUAL ZERO LDR,2LA 

Overlay level (0,0) may not have secondary overlay levels 
(0,1 is illegal) . 



8DX NOT IN LIB 

DSD could not find one of its overlays in PP library. 
Notify system analyst of this message. 



9DM ABORTED 

PP routine DSD calls to load mass storage resident 

overlays terminated because it is not in PP library; 

or it encountered parity error in loading overlay. 
Operator should dump last 1000 (octal) locations of all 

PP's and first 12000(octal) words of CM. Notify 
system analyst of this message. 
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63 FILES ALREADY ON PACK 5DA 

REQUEST card called for new file on private pack, but 
pack has maximum of 63 files already. Job terminated. 

xxx ERRORS IN UPDATE INPUT UPDATE 

*COPYLAB INCORRECT COPYCR , COPYCF 

COPYBR,COPYBF 
*COPYLAB control card is misspelled or next record in 
job stream is not *COPYLAB as expected. 

*EC STATS xx aaaaaaaaaaaa bbbbbbbbbbbb* EC1 

a. ..a last 12 octal digits of word xx. b...b last 12 
octal digits of word xx+1. Gives ECS statistics 
accumulated since last call. Dayfile message. 

*EC STATS DISCONTINUED.* EC1 

Dayfile message if ECS is off or delay interval 7777. 

*EC STATS INTERVAL xxxx SECONDS.* EC1 

Dayfile message issued each time delay interval xxxx 
is changed. 

*G0 OR DROP EC STATS DELAY BEING SET.* EC1 

Dayfile message informs operator of impending change 
in delay interval and requests approval. 

*N0 ECS, OR ECS TURNED OFF.* EC1 

Dayfile message. EC1 cannot find EST entry for ECS 
or ECS is turned off. 

*NOT AN ECS SYSTEM.* EC1 

Dayfile message. EC1 initiated in system that does not 
define ECS. 

**DUPLICATE PARAMETER cc PF MACROS 

**DUPLICATE PARAMETER ON PF CONTROL CARD PFCCP 
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**FOLLOWING PF CONTROL CARD IN ERROR PFCCP 

**ILLEGAL OPTION cc = cccc PF MACROS 

**ILLEGAL OPTION ON PF CONTROL CARD PFCCP 

**MISSING NAME FOR OPTION cc = PF MACROS 

**PARAMETER VALUE EXCEEDS NINE CHARS PFCCP 

**PERMANENT FILE NAME EXCEEDS xx CHARS PFCCP, MACROS 

**PW OPTION HAS TOO MANY PARAMETERS PFCCP 

***ADDFILE FIRST CARD MUST BE *DECK OR 

*COMDECK BUT WAS:.... UPDATE 

***ADDFILE INVALID FROM *READ FILE UPDATE 

***ADDFILE INVALID WITH Q-OPTION UPDATE 

***ABOVE CARD ILLEGAL DURING CREATION RUN UPDATE 

***CARD LENGTH ERROR ON OLD PROGRAM LIBRARY UPDATE 

***CARD NUM ZERO OR INVALID CHAR IN NUM FIELD UPDATE 

***CONTROL CARD INVALID OR MISSING UPDATE 

***DECK NAMES SEPARATED BY PERIOD IN WRONG ORDER UPDATE 

***DUPLICATE DECK NAME UPDATE 

***DUPLICATE IDENT NAME UPDATE 

***ERROR xxxxxxx DECK DOES NOT EXIST UPDATE 

***FILE NAME LONGER THAN 7 CHARACTERS UPDATE 

***IDENT xxxxxxx UNKNOWN UPDATE 

***IDENTIFIER LONGER THAN 7 CHARACTERS UPDATE 

***IDENTIFIERS SEPARATED BY PERIOD IN WRONG ORDER UPDATE 

***INVALID NUMERIC FIELD UPDATE 

***NO DECK NAME UPDATE 
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***N0 SUCH COMMON DECK UPDATE 

***NOT ALL MODS WERE PROCESSED UPDATE 

***NULL ADDFILE UPDATE 

***ON THE ABOVE CARD THE FIRST LIMIT EXCEEDS TERMINAL LIMIT 

***OR A REFERENCE IS MADE TO DECK NOT MENTIONED 
ON COMPILE CARD 

Second line of this message appears only if 
Q-option is in effect. 

***PREMATURE END OF RECORD ON OLD PROGRAM LIBRARY UPDATE 

***RESERVED FILE NAME UPDATE 

***THESE MAY BE MODS TO DECKS NOT MENTIONED ON 

COMPILE CARD OR AN INCOMPLETE ADDFILE UPDATE 

***UNKNOWN IDENTIFIER UPDATE 

***xxx ERRORS IN INPUT: NEWPL, COMPILE SOURCE 

SUPPRESSED UPDATE 

****DEVICE CAPACITY EXCEEDED**** COPYCR, C'OPYCF , 

COPYBR.CQPYBF 
Tape physical record size is greater than buffer on 
read or write or physical record size is greater than 
data format declared on REQUEST control card. 
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MAGNETIC TAPE I/O 



This appendix describes in detail the operations which take place on 1/2 inch magnetic tape files 
during file action requests, data functions, and position functions. 



DEFINITIONS 

Physical Record: Continuous data on tape between two successive inter-record gaps. 

Noise Record: A physical record of 6 characters or less (or as defined by IP. NOISE) is considered 
to be noise on SCOPE and X tapes and is discarded without notification to the user. On S and L 
tapes, noise record size is set by the installation parameter IP. NOISE and will not exceed 62 iq 
bytes (124 characters). 

Physical Record Unit (PRU): Some data formats of tapes acceptable to SCOPE are defined in terms 
of a maximum size physical record. A PRU is a physical record of the maximum size for that 
format. Operations terminate with an error indication if tapes have physical records greater 
than the maximum size allowed. A short PRU is a physical record of size less than the maxi- 
mum. A zero length PRU is a special physical record containing no data; it is 8 characters in 
length and contains a level number, if appropriate. Zero length PRU's appear only on SCOPE 
tapes and on binary X tapes. 



PRU sizes: SCOPE Standard Tape 

X Tape 

S Tape 
L Tape 



Binary 512 CM words 
Coded 128 CM words 

Binary 512 CM words 
Coded 136 characters 

2 to 5120 characters 

2 to n characters (n is size of user buffer) 



Logical Record: A logical record is written on a standard SCOPE tape or binary X tape as one or 
more PRU's, the last of which is a short or zero length PRU. A zero-length PRU is written if 
the logical record size is a multiple of the PRU size. The term logical record is used to mean 
either one physical record or the above mentioned multiple of PRU's. The declared data format 
of the tape defines precisely the exact format of the logical record. The logical record defini- 
tion is normally considered a block by the user, e.g. , COBOL BLOCK CONTAINS clause. 

End of Line Terminator: A 12-bit zero byte in the low order byte of a CM word is the end-of-line 
for coded records on SCOPE standard or X tapes, but is not applicable to S or L tapes. During 
conversion from display code to BCD on SCOPE standard tapes, the zero byte terminator 
becomes external 1632. If the file is destined for an X tape, SCOPE writes each line as a 
136-character physical record with blank fill and converts the zero byte to blanks. 



60189400 Rev. I 



1-1 



TAPE FILE STRUCTURE 
Label Formats 

SCOPE standard, S and L tape files may be unlabeled (assumed if not declared otherwise) or contain 
SCOPE standard labels (E or N declaration on the REQUEST card) . X tapes cannot be labeled. 

Data Formats 

SCOPE Standard: (Assumed if no other declaration is given) . A logical record is one or more 

PRU's. A level number is appended to the last PRU. A PRU is 5120 characters in binary mode 
or 1280 characters in coded mode. A short PRU is lOn + 8 characters where ^ n ^ 511 in 
binary mode or ^ n ^ 127 in coded mode; the last eight characters, containing the logical 
record level number, are not transmitted to or from the user's CM buffer. Physical records 
must contain a multiple of ten characters . 

S (Stranger Tapes): A logical record is equivalent to a physical record. Physical records contain 
multiples of two characters with a maximum of 5120 for a binary or a coded file. No level 
numbers are appended to data, and no line terminators are recognized in data. 

L (Long Record Stranger Tapes): Data format for the L tape is identical to the S tape except the 
size of a physical record is not restricted. The method of conversion depends on the data 
channel converter in use. With the Control Data 6681 Data Channel Converter conversion takes 
place in central memory; with the 6684, conversion is done by the hardware. L tapes 
should be specified only when the files are being processed by specially designed routines which 
can also handle "long" records. Routines which cannot handle long records can find an indica- 
tion in the FET in the device field that the L tape format is being used. Care should also be 
taken not to write records that are longer than the length of tape from the end of reel reflective 
spot to the physical end of tape. In such a case 1MT is unable to detect end of tape before it 
writes off the end of the reel. 

X (External Tapes): Retained for compatibility with tapes created under SCOPE 2.0 and earlier 
systems. For binary files , a logical record is one or more PRU's terminated by a short or 
zero-length PRU; no level number is appended. Physical records contain exact multiples of 10 
characters. For coded files, a logical record is a physical record of up to 136 characters. 
If a line terminator occurs before 136 characters are written, remaining characters are blank. 
If 136 characters occur before a line terminator, the last four characters in the last CM word 
are lost. No level number is appended. 



END POINT PROCESSING 

End-of-File (Tape Mark) Procedures 

A physical end-of-file (tape mark) can appear on a SCOPE standard tape only as part of a label, the 
WRITEF function writes a zero-length logical record with level 17. End-of-file marks may be 
written on X , L and S tapes with the WRITEF function. On labeled tapes, end-of-file marks are 
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written as part of the label. On an input tape, the I/O system determines whether it is part of the 
label. For a SCOPE standard tape, the end-of-file mark indicates a label, since trailer labels are 
always written on SCOPE standard tapes (labeled or unlabeled). X tapes cannot be labeled. For S 
or L tapes, SCOPE determines whether a labeled tape has been declared. If so the I/O system 
determines if a label record is next. If so, end-of-reel or end-of-information procedures are per- 
formed. If the next record is not a label record or if the tape is not labeled, the end-of-file mark is 
treated the same as a zero-length record of level 17; the end-of-file bit is set in the FET status field 
and the function encountered is completed normally. Since X tapes cannot be labeled, when an end- 
of-file mark is read, the end-of-file bit is set in the FET status field and the function is completed. 
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End-of-Reel Procedures 

End-of-reel procedures for an output tape are performed when the end-of-reel reflective spot is 
encountered according to the following table . 



SCOPE Standard 


y 


y 


y 


y 


n 


n 


n 


n 


Labeled 


n 


y 


n 


y 


n 


n 


y 


y 


UP bit set 


n 


n 


y 


y 


n 


y 


n 


y 


Backspace over last physical record 


X 


X 














Write EOV trailer label 


X 


X 










X 




Write 4 tape marks 










X 








Rewind unload reel 


X 


X 






X 




X 




Locate next reel 


X 


X 






X 




X 




Write header label 




X 










X 




Continue function 


X 


X 






X 




X 




Set end-of-reel bit in FET 






X 


X 




X 




X 


Exit to user 






X 


X 




X 




X 



y = yes 

n = no 



End-of-reel procedures for an input tape are performed when an EOV label is encountered on a 
labeled or SCOPE standard tape or when the end-of-reel reflective spot is encountered on an un- 
labeled tape. If the UP bit is not set the next reel is obtained, label checking is performed if the 
tape is labeled and the function continues normally on the next reel. 

WARNING: When the UP bit is set and control, is given to the user, the zero length PRU may 
not have been written if the longest record was an exact multiple of the PRU size. Any 
further writing may appear as part of the previous record. The user is responsible and 
should terminate his file with an end -of -file mark or some other action which will permit 
proper reading of the file. 

End of Information Procedures 

For an output tape, before backward motion takes place, an EOF trailer label is written on labeled 
or SCOPE standard tapes or four end-of-file marks are written on unlabeled tapes. 

For an input tape , end of information is defined only for labeled and SCOPE standard tapes when 
the EOF trailer label is encountered. The end-of-information bit is set in the FET as long as the 
file remains positioned at the end of information. End of information for unlabeled tapes is not 
defined. It is the user's responsibility to determine by some other means when he has processed 
to the end of information. 

DEFINITION OF I/O REQUESTS 

The following tables specify the logical occurrence of events during various I/O operations. In 
every case of conversion between BCD and Display Code, code is not converted if the tape is 
connected to a 6684 data channel converter . 
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READ 


Standard 
Binary 


73 

u 

J "8 


>> 
u 

a 

■i-H 

m 

X 


73 

73 

o 
O 


>> 

ai 

a 

m 

in 


73 
01 

73 
O 

U 


u 

at 

d 
ffl 
i-l 


73 
1) 
73 

o 

o 


1. 


Exit if not enough room in buffer for one maximum 
size physical record. 


x 


X 


X 


X 










2. 


Exit if not enough room in buffer for MLRS words. 










X 


X 


X 


X 


3. 


Read one physical record into PP. 


X 


X 


X 


X 


X 


X 






4. 


Read one physical record into CM. 














X 


X 


5. 


If physical record exceeds maximum allowable 
return error status DEVICE CAPACITY EXCEEDED 
and perform error procedures. 


X 


X 


X 


X 










6. 


If physical record exceeds maximum logical record 
size, return error status DEVICE CAPACITY 
EXCEEDED and perform error procedures. 










X 


X 


X 


X 


7. 


If end-of-file mark was read, perform end-of-file 
mark procedures. 


X 


X 


X 


X 


X 


X 


X 


X 


8. 


If noise records encountered, go to 3. 


X 


X 


X 


X 


X 


X 


X 


X 


9. 


If parity error , perform parity procedures . 


X 


X 


X 


X 


X 


X 


X 


X 


10. 


If end-of-tape reflective spot was encountered and 
tape is unlabeled, perform end-of-reel procedures. 






X 


X 


X 


X 


X 


X 


11. 


If short PRU was read, strip level number. 


X 


X 














12. 


If zero length PRU was read, go to 21. 


X 


X 


X 












13. 


When 6681 present, convert data in PP from BCD to 
Display Code. 




X 




X 




X 






14. 


When 6681 present, convert data in CM from Ext. 
BCD to Display Code. 
















X 


15. 


Convert 1632 line terminator to 0000. 




X 














16. 


Transmit data to CM . 


X 


X 


X 


X 


X 


X 






17. 


Update IN. 


X 


X 


X 


X 


X 


X 


X 


X 


18. 


Fetch OUT from CM. 


X 


X 


X 


X 










Note 


. Event 6 above is a change in specification from 
SCOPE 3.1. Currently, if a long record is 
encountered, the information past the PRU size 
is discarded without notification to the user. 
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READ (CONT'D) 



| I 

02 PQ 



>> 
u 

•r-H 
ffl 

X 



0) 

■8 

o 






T3 
<B 

T3 
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O 



d 
i-l 



-a 

o 
o 



19, Place in word 7 of FET the number of unused bits 
in the last data word. 

| 20. If full PRU go to 1. 

21. If last record was level 17 of tape mark, set end- 
of-file status. 

22. Set end-of-record in status field of FET and exit. 



x 

X 



X 
X 



X 

X 
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READN 



1. Fetch size of MLRS from word 7 of FET. 

2. Exit if not enough room in the circular buffer for one logical record plus 
header word. The buffer size* must > ^(record) + 1 (header) to avoid 
OUT=IN when buffer is full. 

3. Read one physical record into PP. 

4. Read one physical record into CM. 

5. If physical record exceeds maximum allowable, return error status 
DEVICE CAPACITY EXCEEDED and perform error procedures. 

6. If logical record exceeds MLRS, return error status DEVICE CAPACITY 
EXCEEDED and perform error procedures. 

7. If end-of-file (tape mark) was read, perform end-of-file mark proce- 
dures. Go to 18. 

8. If noise records encountered, go to 3. 

9. If parity error, perform parity procedures. 

10. If end-of-tape reflective spot was encountered and tape is unlabeled, 
perform end-of-reel procedures . 

11. When 6681 present, convert data in PP from BCD to Display Code. 

12. When 6681 present, convert data in CM from BCD to Display Code. 

13. Transmit data to CM. 

14. Update IN in PP memory. 

15. Place in buffer header word, length of record and number of unused bits 
in last data word. 

16. Update IN 

17. Fetch OUT. 

18. If last record was tape mark, set end-of-file status and exit. 

19. Go to 2. 



a 
PQ 
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X 
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READSKP 


Standard 
Binary 


I'S 

03 O 


>1 
u 

■l-l 

X 
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X 


S3 

ffl 

02 


T3 

IP 
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T3 
0) 
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o 

1-5 


1. 


Read one physical record into PP. 


X 


X 


X 


X 


X 


X 






2. 


If physical record exceeds maximum allowable (i.e. 
512 CM words, etc.), return error status DEVICE 
CAPACITY EXCEEDED and perform error proce- 
dures. 


X 


X 


X 


X 


X 


X 






3. 


Read one physical record directly from tape to CM 
buffer , stopping without error when available buffer 
space is full. 














X 


X 


4. 


If end-of-file (tape mark) was read , perform end-of- 
file mark procedures. 


X 


X 


X 


X 


X 


X 


X 


X 


5. 


If noise records encountered, go to 1. 


X 


X 


X 


X 


X 


X 


X 


X 


6. 


If parity error, perform parity procedures. 


X 


X 


X 


X 


X 


X 


X 


X 


7. 


If end-of-tape reflective spot was encountered and 
tape is unlabeled, perform end-of-reel procedures. 






X 


X 


X 


X 


X 


X 


8. 


If short PRU was read, strip level number. 


X 


X 














9. 


If zero length PRU was read, go to 10. 


X 


X 














10. 


When 6681 present, convert data in PP from BCD to 
Display Code. 




X 




X 




X 






11. 


When 6681 present, convert data in CM from BCD to 
Display Code. 
















X 


12. 


Convert 1632 line terminator to 0000. 




X 














13., 


Transmit data to CM . If entire record does not fit 
in circular buffer, stop without error at buffer full. 


X 


X 


X 


X 


X 


X 






14. 


Place in word 7 of FET the number of unused bits in 
the last data word. 










X 


X 


X 


X 


15. 


Update IN 


X 


X 


X 


X 


X 


X 


X 


X 


16. 


Fetch OUT from CM . 


X 


X 


X 


X 










17. 


If any unused space in circular buffer , go to 1 . 


X 


X 


X 












18. 


If last record was full PRU , set n=l and proceed to 
SK3PF. 


X 


X 


X 












19. 


If L is less than 17 set L=0. 






X 


X 


X 


X 


X 


X 


20. 


If record was end of file mark (tape mark) , assume 
level= 17. 






X 


X 


X 


X 


X 


x 



60189400 Rev. I 



READSKP (CONT'D) 



2Ti If level number is less than L, set n = 1 and proceed 
to SKIPF. 

If level number is less than L,-set n = 1 and skip 
down tape to first end-of-file mark (tape mark) . 

If last record was level 17, set end-of-file status 
and exit. 



22 



23 



24. If last record was not level 17, return end-of- 
record status and exit. 
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a g 
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RPHR 






X) 
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I 



cl 
pq 
X 



X) 
9) 

X) 
O 

Q 
X 



1. Set OUT = IN. 

2. Exit if not enough room in buffer for one maximum size physical record. 

3. Read one physical record into PP. 

4. If physical record exceeds maximum allowable, return error status 
DEVICE CAPACITY EXCEEDED and perform error procedures. 

5. If end-of-file mark was read, perform end-of-file mark procedures. 

6. If noise records encountered, go to 3. 

7. If parity error, perform parity procedures. 

8. If end-of-tape reflective spot was encountered and tape is unlabeled, 
perform end-of-reel procedures. 

9. If zero length PRU was read, go to 13. 

10. Transmit data to CM. 

11. Update IN. 

12. If last record was level 17 or tape maj'k, set end-of-file status. 

13. Exit. 



Note: Event4 above is a change in specification from SCOPE 3. 1. Currently, 
if a long record is encountered, the information past the PRU size is 
discarded without notification to the user. 
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WRITE 



1. Exit if not full PRU. 

2 . If data from OUT to IN exceeds maximum logical 
record size from FET, return -DEVICE CAPACITY 
EXCEEDED and perform error procedures. 

3. Fetch number of unused bits in last data word from 
FET and adjust record length. If record length 
constitutes a noise record, return DEVICE 
CAPACITY EXCEEDED and perform error proce- 
dures . 

4. Read one PRU of data starting at OUT from CM to 
PP. 

5. Read data contained between OUT and IN from CM 
to PP. Adjust by unused bit count. 

6. When 6681 present, convert Display Code to BCD in 
PP memory. 

7. When 6681 present, convert from Display Code to 
BCD in CM. 

8. Convert zero byte line terminator to 1632. 

9. Convert zero byte line terminator to blanks. If less 
than 136 characters, fill record with blanks to 136. 

10. Write record to tape. 

11. Write.from CM to tape, data contained between OUT 
and IN, adjusted by unused bit count. 

12. When 6681 present, convert data in CM buffer back 
to Display Code. 

13. If parity error, perform parity procedures. 

14. If end-of-tape reflective spot, perform end-of-reel 
procedures . 

15. Update OUT. 

16. Exit. 

17. Fetch IN from CM. 

18. Go to 1. 
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WRITER 






















•a 
si fc 

£3 '^-1 


u 


ci 

m 


T3 
<t> 

T3 
O 

O 


ft 

Ei 

•M 

ffl 


CD 

O 


a 
ffl 


CD 

■a 
o 
o 






Ki ffl 


M O 


X 


X 


w 


CO 


,-1 


J 


1. 


If IN = OUT exit. 






X 


X 


X 


X 


X 


X 


2. 


If PRU not full, insert level number in PP buffer. 


X 


X 














3. 


If data from OUT to IN exceeds maximum logical 
record size from FET, return DEVICE CAPACITY 
EXCEEDED and perform error procedures. 










X 


X 


X 


X 


4. 


Fetch number of unused bits in last data word from 
FET and adjust record length. If record length con- 
stitutes a noise record, return DEVICE CAPACITY 
EXCEEDED and perform error procedures. 










X 


X 


X 


X 


5. 


Read one PRU of data starting at OUT or data 
between OUT and IN, whichever is smaller, from 
CM to PP. 


X 


X 


X 


X 










6. 


Read data between OUT and IN from CM to PP. 
Adjust by unused bit count. 










X 


X 






7. 


When 6681 is present, convert Display Code to BCD 
in PP memory. 




X 




X 




X 






8. 


When 6681 is present, convert Display Code to BCD 
in CM. 
















X 


9. 


Convert zero byte line terminator to 1632. 




X 














10. 


Convert zero byte line terminator to blanks. If less 
than 136 characters, fill record to 136 with blanks. 








X 










11. 


If IN = OUT, write zero length record. Go to 12. 


X 


X 


X 












12. 


Write record to tape. 


X 


X 


X 


X 


X 


X 






13. 


Write, from CM to tape, data contained between 
OUT and IN, adjusted by unused bit count. 














X 


X 


14. 


When 6681 is present, convert data in CM buffer to 
Display Code. 
















X 


15. 


If parity error, perform parity procedure. 


X 


X 


X 


X 


X 


X 


X 


X 


16. 


If end-of-tape reflective spot, perform end-of-reel 
procedures. 


X 


X 


X 


X 


X 


X 


X 


X 


17. 


Update OUT 


X 


X 


X 


X 


X 


X 


X 


X 


18. 


Exit. 










X 


X 


X 


X 


19. 


If full PRU not written, exit. 


X 


X 


X 


X 
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WRITER (CONT'D) 
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20. Go to 1. 



In events 1 and 5 , a PRU for coded X tapes is 136 char- 
acters or less than 136 terminated by a zero byte. 



60189400 Rev. I 



1-13 



WRITEF 



1. If no data from OUT to IN, go to 23. 

2. If no data from OUT to IN, go to 19. 

3. If not full PRU, insert level number. 

4. If data from OUT to IN exceeds maximum logical 
record size, return DEVICE CAPACITY EXCEEDED 
and perform error procedures. 

5. Fetch number of unused bits in last data word from 
FET and adjust record length. If record length con- 
stitutes a noise record, return DEVICE CAPACITY 
EXC EEDED and perform error procedures . 

6. Fetch one PRU of data starting at OUT or data 
between OUT and IN, whichever is smaller, from 
CM to PP. 

7. If OUT = IN insert 4 zero bytes in the PP buffer. 

8. Read data contained between OUT and IN from CM 
to PP. Adjust by unused bit count. 

9. When 6681 present, convert Display Code to BCD in 
PP memory. 

10. When 6681 present, convert Display Code to BCD in 

CM. 

11. Convert zero byte line terminator to 1632. 

12 . Convert zero byte line terminator to blanks . If less 
than 136 characters, fill record to 136 with blanks. 

13. Write record to tape. 

14. Write, from CM to tape, the data contained between 
OUT and IN, adjusted by unused bit count. 

15. When 6681 present, convert data in CM buffer to 
Display Code. 

16. If parity error, perform parity procedures. 

17. If end-of-tape reflective spot, perform end-of-reel 
procedures . 

18. Update OUT. 

19. Write end- of -file mark and exit. 
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WRITE F (CONT'D) 



"275"! If full PHU not written, write zero length level 17 
record and exit. 

21. If full PRU not written, write file mark and exit. 

22. Go to 3. 

23. If last operation was WRITE, write zero length 
PRU. 

24. Go to 17. 
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1. If OUT = IN, exit. 

2. Fetch header word from OUT. Set PPOUT = OUT + 1. Set PPIN = 
PPOUT + no. of CM words in logical record. If PPIN has passed IN, 
exit. 

3. If data from PPOUT to PPIN exceeds maximum physical record size, 
return DEVICE CAPACITY EXCEEDED and perform error procedures. 

4. Adjust record length by number of unused bits in last data word (from 
header word). If record length constitutes a noise record, return 
DEVICE CAPACITY EXCEEDED and perform error procedures. 

5. Fetch data contained between PPOUT and PPIN. Adjust by unused bit 
count. 

6. When 6681 present, convert Display Code to BCD in PP memory. 

7. When 6681 present, convert Display Code to BCD in CM. 

8. Write record to tape. 

9. Write, from CM to tape, the data contained between OUT and IN, 
adjusted by unused bit. 

10. When 6681 present, convert data in CM buffer back to display code. 

11. If parity error, perform parity procedures. 

12. If end-of-tape reflective spot, perform end-of-reel procedures. 

13. Update PPOUT. 

14. Update OUT. Fetch IN. Go to 1. 
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WPHR 



If IN = OUT, exit. 



2. If more than 512 words in buffer, return DEVICE CAPACITY 
EXCEEDED to FET. 

3. Fetch data from OUT to IN, or 512 words from OUT, whichever is 
smaller. 

4. Write record to tape. 

5 . If parity error , perform parity procedures . 

6. If end-of-tape reflective spot, perform end-of-reel procedures. 

7. Update OUT and exit. 
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SKIPF 



1. If n = 0, setn= 1. 

2. If L is less than 17, Interpret L as being equal to 0. 

3. Read a physical record. 

4. If noise record encountered, go to 3. 

5. 



If end-of-tape reflective spot encountered and tape 
is not labeled, perform end-of-reel procedures. 



6. 

7. 



8. 



If record is full PRU, go to 3. 

If end-of-file mark encountered and tape is not 
labeled, assume level number equals 17. 

If record is not end-of-file mark, assume level 
number equals 0. 

If end-of-file mark encountered and tape is labeled, 
perform end-of-file procedures. 

If level number is less than L, go to 3. 

11. Subtract 1 from n. If n ^ 0, go to 3. 

12. Return end-of-record to status. If Last level num- 
ber was 17 return end-of-file to status. Exit. 



Events 2, 7, and 8 differ from SCOPE 3.1. Currently 
L is assumed equal to zero for X tapes. 



10 



Event 4 is not done in SCOPE 3. 1. 
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SKIPB 
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1. If n = 0, set n = 1. 

2. If L is less than 17, interpret L as being equal to 0, 

3. If reel is at beginning of data (either physical load 
point or zero physical record count), set beginning 
of information and exit. 

4. Read one physical record backwards. 

5. If noise record encountered, go to 4. 

6. If record was full PRU, go to 3. 

7. If this is first read backwards, go to 3. 

8. Position forward over short PRU. 

9. If end-of-file mark encountered, assume level num- 
ber = 17. If not end-of-file mark, assume level 
number = 0. 

10. If level number is less man L, go to 3. 

11. Subtract 1 from n. If n is not equal to zero, go to 3. 

12. Exit. 



In SCOPE 3.1 the beginning of information is not set as 
specified in event 3. 

Event 5 is not performed in SCOPE 3. 1. 

Event 9 differs from SCOPE 3.1; the system level num- 
bers are ignored for files other than standard files. 
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BKSP 



The BKSP function is identical to SKIPB with n = 1 and 
L = 0. 
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1. If at load point or PRU count = 0, set beginning of 
information in FET and exit. 

2. Backspace one physical record. 

3. Subtract 1 from n. If n not equal to 0, go to 1. 

4. Exit. 



SCOPE 3. 1 does not set beginning of information as 
specified in event 1. 
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PRINT FILE CONVENTIONS 



Files with a print disposition (including OUTPUT) and files assigned to a printer, must adhere to 
specific format rules as follows: 

1. All characters must be in display code. 

2. The end of a print line must be indicated by a zero byte in the lower 12 bits of the last 
central memory word of the line. Any other unused characters in the last word should 
be filled with display code blanks (55g). For example, if the line has 137 characters 
(including carriage control), the last word would be aabbccddeeff550000 in octal; the 
letters represent the last seven characters to be printed in the line. No line should be 
longer than 137 characters. 

3. Each line must start in the upper 6 bits of a CM word. 

4. The first character of a line is the carriage control, which specifies spacing as shown in 
the following table. It will never be printed, and the second character in the line will 
appear in the first print position; therefore a maximum of 137 characters can be specified 
for a line, 136 is the number of characters that will be printed. All characters apply to 
both the 501 and the 512 unless they are specifically designated otherwise. 

Carriage Control Characters 



Character 

A 
B 
C 
D 
E 
F 
G 
H 

I 

J 
K 
L 
1 

2 
3 



Action Before Printing 



Space 
Space 
Space 
Space 
Space 
Space 
Space 
Space 



Space 1 

Space 1 

Space 1 

Space 1 

Eject to top of next page 

Skip to last line on page 

Skip to channel 6 



Action After Printing 

Eject to top of next paget 
Skip to last line of page t 
Skip to channel 6 
Skip to channel 5 
Skip to channel 4 
Skip to channel 3 
Skip to channel 2 
Skip to channel 1 (501) 
Skip to channel 11 (512) 
Skip to channel 7 (512) 
Skip to channel 8 (512) 
Skip to channel 9 (512) 
Skip to channel 10 (512) 
No space t 
No space t 
No space 



1" The top of a page is indicated by a punch in channel 8 of the carriage control tape for the 501 
printer and channel 1 for the 512 printer. The bottom of page is channel 7 in the 501 and 12 in 
the 512. 
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Character Action Before Printing Action After Printing 

4 Skip to channel 5 No space 

5 Skip to channel 4 No space 

6 Skip to channel 3 No space 

7 Skip to channel 2 No space 

8 Skip to channel 1 (501) No space 

Skip to channel 11 (512) No space 

9 Skip to channel 7 (512) No space 
X Skip to channel 8 (512) No space 
Y Skip to channel 9 (512) No space 
Z Skip to channel 10 (512) No space 
+ No space No space 
(zero) Space 2 No space 
- (minus) Space 3 No space 
blank Space 1 No space 

When the following characters are used for carriage control, no printing takes place. The remainder 
of the line will not be printed. 

Q Clear auto page eject 

R Select auto page eject 

S Clear 8 vertical lines per inch (512) 

T Select 8 vertical lines per inch (512) 

PM Output remainder of line (up to 30 characters) on the B display and the dayfile 

(col 1-2) and wait for the JANUS typein /OKuu. For files assigned to a printer, n.GO. 

must be typed to allow the operator to change form or carriage control tapes . 

any other Acts as a blank 

Any pre-print skip operation of 1, 2 or 3 lines that follows a post skip operation will be reduced to 
0, 1 or 2 lines. 

I The functions S and T should be given at the top of a page; in other positions, S and T can cause 
spacing to be different from the stated spacing. Q and R need not be given at the top of the page 
as each will cause a page eject before performing its function. 
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GLOSSARY OF SCOPE TERMS 



Active file 

A file immediately available to the system because of its location on a mass storage device, 
tape, or extended core storage. Any file with an entry in the file name table is an active file. 

Allocatable device 

A mass storage device such as a disk, drum, or extended core storage which can be shared by 
more than one job. 

Central memory resident (CMR) 

Variable length low core area of central memory reserved for tables , pointers , and subroutines 
necessary for operation of the SCOPE system. 

Central program control (CPC) 

A SCOPE subroutine which the system loads into the field length of every user program that con- 
tains a file action request or a system action request. Its function is to communicate central 
processor requests to the peripheral processors by way of the system monitor routine. 



CIO 



A SCOPE peripheral processor routine which directs the processing of input/output function 
requests according to the parameters established by the user in the file environment table . 



Code and status field (CS) 

A field in the file environment table , the file status table , or in the permanent file definition 
block. SCOPE establishes the CS field and uses it to communicate information about functions 
requested by the user program and to return information to the user. 



Coded file 

A file whose contents are assumed to be alphanumeric characters and special characters such as 
= , +, and $. 
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Common file 

A file in the system that any job at a control point may attach and use as a part of that job. The 
file remains in the system until it is released by a control card or file action request, or until 
the system is deadstarted. 



Control points 

The concept by which the multiprogramming capability of the 6000 series computers is exploited. 
Assigning a control point number to a job results in allocation of some of the resources of the 
system to that job. 

Control point area 

A 2008 word area of central memory resident for each control point. It contains the exchange 
jump package, flags, pointers and other information pertinent to each job assigned to a corres- 
ponding control point number. 



Cycle 

One of the five files that may be cataloged under one permanent file name. 

Data channel 

One of the twelve 12-bit bi-directional channels by which information passes between the peri- 
pheral processors and peripheral devices. 



Dayfile 

A chronological file maintained on system mass storage device which forms a permanent account- 
ing and job history file. Entries, called dayfile messages, are generated by operator action or 
by the system when control cards are processed or other significant action occurs. A portion of 
the most recent system dayfile is displayed at the console; a copy of the job dayfile is printed 
with the output for each job. 



Deadstart 

The process of initializing the system by loading the SCOPE library programs from magnetic 
tape or mass storage. Deadstart recovery is re-initialization after system failure. 
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DSD (system display) 

The SCOPE system program that provides communication between the operator and the system 
by accepting control information typed on the console keyboard and by driving the displays to 
present the operator with information pertinent to all jobs known to the system. DSD is perma- 
nently assigned to peripheral processor 9. 

Device status table (DST) 

A central memory resident table, with entries for each mass storage device controller, that 
gives the current position of the heads of a device and other information. It is used by the stack 
processor to determine which request for the device can be most easily satisfied. 

Device type code (dt) 

An optional parameter on a REQUEST card or in the file environment table which specifies the 
type of device to be used for that file. 

DIS (job display) 

A system peripheral processor program similar to system display DSD that provides for commu- 
nication between a job in central memory and the user at console, and permits the user to control 
execution of the program by means of the keyboard. 



Disposition code (dc) 

An optional parameter on a REQUEST card or in the file environment table that indicates how a 
file is to be processed after the job is terminated or the file is closed. 



EDITLIB 

A library maintenance program that allows insertion, replacement, and deletion of object lan- 
guage programs in the system library during normal system operation. 

End-of-file (EOF) 

A short physical record unit or zero-length physical record unit containing a level number of 17g 
or a card or card image with 6-7-8-9 punches in column 1 that indicates the logical file end. 
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End-of-information (EOI) 

The physical end of data in a file. Some files may have more than one end-of-file indication, 
but no file may have more than one end-of-information. 

End-of- record (EOR) 

A short physical record unit or a zero-length physical record unit containing a level number less 
than 16g or a card or card image containing 7-8-9 punches in column 1. 

Equipment number 

A number from 0-7 which identifies the setting on a peripheral device controller. 

Equipment status table (EST) 

A table within central memory resident, with an entry for each hardware device attached to the 
system, that shows the data channel assignment and whether the equipment is currently in use. 

EST ordinal 

The number designating the position of an entry within the equipment status table established at 
each installation. 

Field length (FL and FE) 

FL is the number of central memory words a job requires, as established by the user in a JOB 
card or by an RFL control card parameter or by a MEMORY system action request. FE is the 
number of words in extended core storage that a job requires. Within central memory or 
extended core storage, the field length added to the reference address defines the upper address 
limit of a job. 

File definition block (FDB) 

A table used for communication between a user program and the permanent file manager portion 
of the SCOPE system. An FDB for each permanent file in the user program must reside in the 
field length. 
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File environment table (FET) 

A table used for communication between a user program and the operating system when files are 
processed. An FET created by a compiler or by the user is required within the user field length 
for each file in the program. 

File name table/file status table (FNT/FST) 

A table within central memory resident with a three-word entry for each file known to the sys- 
tem. The first word (the file name table entry) consists of the logical file name and control 
information; the second and third words (the file status table entry) show the current use being 
made of the file. 



Hang 



A system stop that may be caused by hardware failure or by an error in a peripheral processor 
program. 



JANUS 



The SCOPE peripheral processor routine which controls the processing of up to 4 card readers, 
3 card punches, and 12 line printers. It normally functions at control point 1, but may be 
assigned to another control point by the operator. 



Labeled tape 

A magnetic tape with header and trailer labels having the format of the 6000 series standard 
labels or the 3000 series labels. 



Level 



An indicator specifying relative position in a hierarchy. For priority considerations, level is 
the lowest priority. For segment loading, level is the initial segment loaded. For overlay 
loading, both primary and secondary designations are required, with level (0,0) being the main 
overlay. 



Level number 

A number from 0-178 that the user appends to a short physical record unit or places in a zero- 
length physical record unit to form logical record groups within files. Level number 17g 
indicates a logical end-of-file. Level number 16g is used by checkpoint/restart and should not 
otherwise be specified by the user. 
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Local file 



A file attached to a job assigned to a control point. Unless a local file is to be processed further 
(because it has a user-declared non-zero disposition code, is a system output file, or is 
declared to be a common file or a permanent file) , it vanishes when the job is terminated. 



Locked file 



A local file with the lock bit set in its file name table entry. The file cannot be processed fur- 
ther by the system until the lock bit is cleared. 

Logical file name (lfn) 

The 1-7 alphanumeric display coded characters by which the operating system recognizes a file. 
The name is taken from the file environment table or from a REQUEST card parameter and 
placed in the file name table when the file is established. 

Logical record 

A grouping of data consisting of one or more physical record units immediately followed by a 
short physical record unit or a zero-length physical record unit. 

L tape 

A tape containing physical records whose size ranges from one central memory word to an upper 
limit specified by the size of the buffer for that tape. 

Monitor (MTR) 

The SCOPE routine which coordinates and controls all activities of the system. It occupies 
peripheral processor 0. It schedules the use of the central processor and the other peripheral 
processors. 

Non-allocatable device 

A device such as a magnetic tape or a private disk pack which can be used by only one job at a 
given time. 

Overlay 

A block of absolute object code called by a user program and loaded into a specified area of the 
field length at the time it is needed for execution. 



Glossary-6 60189400 Rev « * 



Owncode 



An optional parameter of the file environment table which specifies the address of a user-supplied 
routine to be used when an end-of-information or an error is encountered. 



Permanent file 

A file on a mass storage device which is protected from unauthorized access and accidental des- 
truction. Unlike a common file, it is not destroyed by normal deadstart. 

Permanent file directory (PFD) 

A mass storage resident directory of all permanent files with their passwords and other perti- 
nent information. It cannot be accessed by any central processor program. 

Permanent file manager (PFM) 

Peripheral processor programs corresponding to permanent file functions which implement user 
requests for permanent file processing. 



Physical record unit (PRU) 

The smallest amount of information transmitted by a single physical operation of a specified 
equipment, measured in central memory words. A PRU for mass storage devices is 64^q words 
long; that for SCOPE binary magnetic tape is 512io words; etc. 



Program library 

The source language programs which compile or assemble into the SCOPE system library. The 
program library is maintained by using the UPDATE program. 



Recall 



The state of a program when it has released control of the central processor until a fixed time 
has elapsed or until a requested function is complete. Recall is a system action request, as 
well as an optional parameter of some file action requests. 



Record block 

A storage area of a fixed size, relative to specific mass storage devices, which is the smallest 
division of the device that can be assigned to a file. 
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Record block reservation table (RBR) 

A central memory resident table for each allocatable device. It is used during input/output pro- 
cessing to indicate whether a given record block of the device is available for assignment to a 
file. 



Record block table (RBT) 

A chain of two-word entries determining the record blocks occupied by each file on an allocatable 
device. It resides in high central memory when the file is active. 



Record block table catalog (RBTC) 

A mass storage resident table of entries for each permanent file containing the owner identifica- 
tion, pointers, and record block chain for the file. It cannot be accessed by any central proces- 
sor program. 

Reference address (RA and RE) 

RA is the central memory address that is the starting, or zero, address for a program. RA + 1 
is used as the communication word between the user program and monitor. RE is the extended 
core storage starting address used by a program. 



S tape (stranger tape) 

A magnetic tape (labeled or unlabeled) containing physical records ranging in size from 2 charac- 
ters to 512010 characters. This tape does not contain any level numbers. 



SCOPE 

The operating system for the CONTROL DATA 6400/6500/6600 computers. The name is derived 
from Supervisory Control of Program Execution. 



SCOPE tape 

A tape created under SCOPE 3 with fixed length physical record units: for coded tape, 128 10 
central memory words; for binary tape, 512]^ central memory words. A SCOPE tape may be 
labeled or unlabeled. 
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Segment 

A group of relocatable subprograms which may be loaded or removed from memory as a unit. 

Short PRU 

A physical record unit containing fewer than normal words, and to which a level number has 
been appended to indicate the end of a logical record. 

Stack processor 

A group of peripheral processor routines which processes the requests for all mass storage 
functions and efficiently sequences execution of these requests. 

Standard labeled tape 

A tape with labels conforming to the proposed USA Standard for Magnetic Tape Tables and File 
Structure for Information Interchange. Also called a system labeled tape. 

System library 

The collection of object language programs residing in central memory or on mass storage which 
are necessary for running the SCOPE system and its product set. 

Transient program 

A program which occupies a peripheral processor only for the time it is needed to perform a 
task assigned by the monitor. 

Unlabeled tape 

A magnetic tape that does not have a header label. Unlabeled tapes generated by SCOPE contain 
a trailer label similar to the trailer for a standard labeled tape for the 6000 series computers. 

Unsatisfied external 

An external reference in a user program for which the system does not have a link to a user 
program or a system library program after the user program is loaded. 



60189400 Rev. I Glossary-9 



UPDATE 



A library maintenance program that allows a program library to be modified or a new program 
library to be created. It maintains a record of the changes made to individual cards in the 
library by using correction history bytes.. 



X tape 

An external tape in SCOPE 2 format which: in BCD mode, consists of physical records of 136 10 
characters including any blank fill; in binary mode, has a logical record structure with a physical 
record unit size of 512 10 words. 

Zero length PRU 

A physical record unit containing only a level number that is used to terminate a logical record; 
it does not contain any data. 
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MT xx labl FILE NAME WRITTEN WAS xxx...xx. 4LB 

xxx... xx is the name in the tape label for this file, 
labl is label identifier. 



MT xx labl MULTIFILE NAME SHOULD BE xxx, IS xxx. 4LB 

Multiple file name of assigned tape does not agree with 
request. First xxx is in FET; second is in tape label, labl. 
Tape may be accepted by typing n.GO. Different tape may 
be mounted and checked by typing n.RECHECK. Job may 
be dropped by typing n.DROP. 

MT xx labl REEL NUMBER WAS xxxxxx 4LB 

xxxxxx is visual reel numbers for tape being read, 
labl is label identifier. 

MT xx labl REEL NUMBER SHOULD BE xxxx, IS xxxx 4LB 

Requested tape reel number does not agree with that 
specified in tape file label, labl. 

MT xx labl REEL NUMBER WRITTEN WAS xxxxxx 4LB 

xxxxxx is visual reel number in tape volume header, 
labl is label identifier. 



MTxx CHxx 1MT 

EQUIPMENT REJECT 

Hardware rejected equipment connection. Message persists 
until condition is corrected or operator drops job. 

MTxx CHxx 1MT 

NO RESPONSE 

Equipment cannot be connected because of hardware failure. 

MTxx CHxx 1MT 

NO WRITE ENABLE 

Message persists until operator inserts write ring or 
drops the job. 
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ABORT macro 3-54 

Absolute index bit (FET) 3-12 

Access, random 1-10 

Active files 1-4 

ADD (EDITLIB) 5-6 

*ADD (EDITSYM) 7-7 

ADDBCD (EDITLIB) 5-6 

ADDCOS (EDITLIB) 5-7 

*ADDFILE (UPDATE) 6-14 

ADDTEXT (EDITLIB) 5-7 

Allocatable devices 3-8 

ALS - 6X00 random instruction test 12-3 

APR calls 10-19 

Arithmetic error 2-3 

Assembly directive control cards 

(UPDATE) 6-5 
Assembly errors 4-13 
ATTACH 13-2, 14 
AUDIT routine 13-22 
Automatic Program Sequencer (APR) 10-18 

calls to APR 10-19 

console entries 10-20 

sample job structure 10-20 

Basic FET 3-5 

Backspace logical record 10-14 

BKSP macro 3-48; 10-14 

BKSPRU macro 3-48 

Buffer emptying 3-71 

*CALL (UPDATE) 6-18 
Call cards 

EDITLIB 5-2 

EDITSYM 7-4 
Calling sequence, CPC 3-24 
♦CANCEL (EDITSYM) 7-7 
CARD 

control 2-2 

files E-2 

format E-l 

free-form E-3 

identification, program libary 6-3 
Cards, program, utility 10-1 



CATALOG (permanent files) 13-2 , 9 

* CATALOG (EDITSYM) 7-6 

CE diagnostics, See customer engr. diagnostics 

CEFAP Execution 12-28 

CEFAP Operation 12-27 

Central memory usage, multiprogramming 1-2 

Central program control 

subroutine 3-24 

calling sequence 3-24 
Character set A-l 
CHECKPT macro 3-52 
Checkpoint REQUEST 8-1 
Checkpoint, unrestartable dumps 8-6 
CIO codes 3-7 
CKP 2-4 

CLOCK macro 3-55 
CLOSE macro 3-29, 70 
CLOSER macro 3-31 
CM6 - 6X00 central memory test 12-6 
Code and status field (FET) 3-6 
COMBINE 10-14 
*COMDECK 

EDITSYM 7-5 

UPDATE 6-7, 15 
COMMENT card 2-4 
COMMON card 2-15 
Common decks, program library 7-2 
Common file 1-5; 3-66 
Common macro 3-70 
COMMON macro 3-50 
COMPARE routine 10-16 
COMPARE, utility program 10-16 
Compilation errors 4-13 

* COM PILE 

EDITSYM 7-6 

UPDATE 6-18 
Compile output, 

program library 7-3 
COMPLETE (EDITLIB) 5-8 
Compressed deck, 

program library 7-3 
CONTRC macro 3-31 
Control card fields 2-2 
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Control cards 

*ADD (EDITSYM) 7-4 

*ADDFILE (UPDATE) 6-14 

Assembly directive (UPDATE) 6-5 

BKSP (utility) 10-14 

Call (EDITSYM) 7-4 

Call (job) 2-7 

♦CALL (UPDATE) 6-18 

♦CANCEL (EDITSYM) 7-7 

♦CATALOG (EDITSYM) 7-6 

CHECKPT 8-1 

CKP 2-4; 8-1 

COMBINE 10-14 

♦COMDECK (EDITSYM) 7-5 

♦COMDECK (UPDATE) 6-7, 15 

COMMENT 2-4 

COMMON 2-15 

COMPARE (utility) 10-16 

* COMPILE (EDITSYM) 7-6 

* COMPILE (UPDATE) 6-18 
♦COPY (EDITSYM) 7-5 

| COPY (utility) 10-2 

COPYN (utility 10-6.1 

Correction directive (UPDATE) 6-9 

Creation directive (UPDATE) 6-7 

♦CWEOR 6-16 

DEBUG 11-15 

*DECK (EDITSYM) 7-5 

♦DECK (UPDATE) 6-7, 15 

Deck sequence (EDITSYM) 7-5 

*DELETE (EDITSYM) 7-7 

♦DELETE (UPDATE) 6-12 

Demonstration program F-l 

DMP (utility) 10-15 

♦EDIT (EDITSYM) 7-6 

EDITSYM 7-5 

Edit control (EDITSYM) 7-6 

*END (EDITSYM) 7-5 

*END (UPDATE) 6-7 

EXECUTIVE 2-7 

EXIT 2-4 

File manipulation (UPDATE) 6-6 

*IDENT (UPDATE) 6-9 

♦INSERT (EDITSYM) 7-6 

♦INSERT (UPDATE) 6-12 

Job 2-2 

♦LABEL (UPDATE) 6-6 
| LGO (Program Call) 2-7 

LOAD 2-7 



LOADER 2-6 

LOC (utility) 10-14 

Map control 2-9 

MAP (ON) 2-9 

MAP (OFF) 2-9 

MAP (PART) 2-9 

MODE 2-3 

name (program call) 2-7 

New decks (EDITSYM) 7-5 

NOGO 2-8 

Output directive (UPDATE) 6-11 

OVERLAY 4-8 

Program 2-5 

Program call 2-7 

* PURGE (UPDATE) 6-9 

REDUCE 2-8 

RELEASE 2-16 

REQUEST 2-10 

RESTART 8-6 

♦RESTORE 6-12 

RETURN 2-16 

REWIND (COPYN) 10-7 

REWIND (utility) 10-13 

RFL (utility) 10-15 

♦SKIP (UPDATE) 6-6 

♦Slash (UPDATE) 6-14 

SNAP 11-7 

SWITCH 2-3 

TRACE 11-1 

UPDATE 6-5 

Utility 10-1 

*WEOR (EDITSYM) 7-6 

♦WEOR (UPDATE) 6-16 

♦YANK (UPDATE) 6-13 
Control point job display 9-1 
Control point number (FNT) 3-2 
Control points, 

multiprogramming 1-2 
Control statements 

COMMON 1-6 

RELEASE 1-6 
COPY (EDITSYM) 7-5 
COPY routines 

COPY 10-2 

COPYBCD 10-6.1 

COPYBF 10-3 

COPYBR 10-3 

COPYCF 10-3 

COPYCR 10-3 
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Copy routines (Cont'd) 
COPYLAB 10-5 
COPYL 10-11 
COPYN 10-6.1 
COPYSBF 10-6 
Record identification 10-8 
REWIND 10-13 
SKIPB 10-13 
SKIPF 10-13 
SKIPR 10-8 
UNLOAD 10-13 
WEOF 10-8 

Correction directive control cards 
(UPDATE) 6-9 

Corrections, overlapping (UPDATE) 6-13 

CPC 3-24 

CPLOADR 4-1, 3 

CPLPARM 4-8 

CP1 - 415 card punch test 12-11 

Creation directive control cards (UPDATE) 6-7 

CR1 -405 card reader test 12-12 

CT3 - 6X00 random instruction test 12-5 

Customer Engineering (CE) Diagnostics 12-1 
ALS - 6X00 random instruction test 12-3 
CM6 - 6X00 central memory test 12-6 
CPU and memory tests 12-3 
CPl - 415 card punch test 12-11 
CR1 - 405 card reader test 12-12 
CT3 - 6X00 random instruction test 12-5 
CU1 - 6X00 command test 12-6 
DT2 - 6638 disk file test 12-8 
EC2 - 663X extended core storage test 12-6 
FST - 6X00 random instruction test 12-5 
LPT - 501 line printer test 12-9 
LP1 - 512 line printer test 12-10 
modes of operation 12-1 
MTT - 60X magnetic tape test 12-8 
MY1 - 6X00 central memory test 12-6 
peripheral equipment tests 12-7 
sample jobs 12-12 

CU1 - 6X00 command test 12-6 

*CWEOR 6-16 

Cycles 13-2 



Data function macros 3-20 
DATE macro 3-55 
DEBUG control card 11-15 



Debugging 11-1 
*DECK 

EDITSYM 7-5 

UPDATE 6-7, 15 
Deck grouping (UPDATE) 6-7 
Decks 7-2 

Common, program library 7-2 

Compressed program library 7-3 

New (EDITSYM) 7-5 

Overlay 4-8 

Sequence control cards (EDITSYM) 7-5 

Text, program library 7-2 
Definitions, system symbols G-l 
DELETE card (EDITLIB) 5-3, 7 
*DELETE 

EDITSYM 7-7 

UPDATE 6-12 
Device type (FET) 3-8 

labels C-l 
Directives, loader 4-5 
DIS 9-1 

DIS display 9-16 
Disk pack 

device label C-l 

file 1-14 

displays 9-1 
Display characters A-l 
Display keyboard entries 9-1 
Displays 9-1 

Disposition code (FNT) 3-3 
Disposition code (FET) 3-11 
DMP routine 10-11; 11-11 
DSD 9-1 

DT2 - 6638 disk file test 12-8 
DUMPF routine 13-22 
Dump storage, utility program 10-15 
Dumps 

Checkpoint 8-1 

TRACE 11-1 

Unrestartable checkpoint 8-6 



ECS 

dump 10-15 
EC2 - 663X extended core storage test 12-6 
*EDIT (EDITSYM) 7-6 
Edit control cards (EDITSYM) 7-6 
Edition number 3-16 
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EDITLIB 5-1 

call card 5-2 

examples 5-9 
EDITLIB function cards 5-2.1 

ADD 5-6 

ADDBCD 5-6 

ADDCOS 5-7 

ADDTEXT 5-7 

COMPLETE 5-8 

DELETE 5-3, 7 

LENGTH 5-7 

Library revision 5-4 

LIST 5-4 

MOVE 5-3 

position functions 5-8 

READY 5-4 

REWIND 5-8 

SKIPB 5-8 

SKIPF 5-8 

system modification 5-3 

TRANSFER 5-5 
EDITSYM 7-1 

call card 7-4 

control cards 7-4 

deck sequence control 7-5 

edit control 7-6 

examples 7-8 
Effects , Q option 6-12 
*END 

EDITSYM 7-5 

UPDATE 6-7 
ENDRUN macro 3-54 
ENTR table D-2 
EOI address (FET) 3-19 
Equipment assignment control cards 2-9 
Equipment type (FNT) 3-2 
Equipment type mnemonics 2-9; 9-8 
Error address (FET) 3-19 
Error bypass bit (FET) 3-12 
Error Logging Procedure 12-18 
Error Codes 12-23 
Error messages H-l 

COPYN 10.-11 
Error Modes 2-3 
Error processing bit (FET) 3-11 
Errors in assembly/compilation 4-13 
EVICT macro 3-31 
Examples 

EDITLIB 5-8 



EDITSYM 7-8 

UPDATE 6-15 
EXECUTE card 2-6 
Execution 

loader 4-7 

program 2-5 
EXIT card 2-4 , 4-13 
EXPORT/IMPORT jobs 3-11 
EXTEND 13-3, 18 



FDB 13-7 

FET, absolute index bit 3-12 
FET address (bit) 3-4 
FET creation macros 3-22 

random binary file 3-22 

random coded file 3-22 

sequential binary file 3-22 

sequential coded file 3-22 
FET error bypass bit 3-12 
FET extension B-l 
Field length calculation F-7 
Field length request, utility program 10-16 
Fields, control card 2-2 
File Environment Table Fields 3-4 

device type 3-8 

disposition 3-65, 68 

disposition code 3-12 

EOI address 3-19 

error address 3-19 

error processing bit 3-11 

file indexing 3-17 

FIRST 3-14 

FNT pointer 3-13 

IN 3-14 

length 3-13 

LIMIT 3-14 

OUT 3-14 

OWNCODE routine activity 3-14 

physical record unit size 3-9 

random access bit 3-13 

record block size 3-10 

release bit 3-10 

user processing bit 3-10 

working storage 3-14 
File manipulation 10-13 
File name (FNT) 3-1 
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File name table 1-4; 3-1 

control point number 3-2 
disposition code 3-3 
equipment type 3-2 
FET address 3-4 
file name 3-1 
file type 3-2 
last code and status 3-3 
permissions 3-3 
security code 3 -3 
File positioning (COPYN) 10-9 
Files 1-5 

action request macros 3-26 
active 1 -4 
common 3-66 
edition number 3-21 
File Environment Table 3-14 
header label 1-13; C-2 
indexing (FET) 3-17 
input 3-64 
label name 3-21 
labels 1-11 

manipulation control cards (UPDATE) 
non-allocatable 3-66 
non-zero disposition 3-65 
output 3-65 
permanent 3-66 
private disk pack 3-67 
processing 3-63 
purging 13-3, 14 
random access 1-10; 3-67 
reel number 3-21 
retention 13-3 
special name 3-65 
trailer label 1-14; C-3 
type (FNT) 3-2 
Files, card E-2 
FILL table D-5 
FIRST (FET) 3-14 
Flag words 2-2 
Flow, job 2-1 
FNT 1-4 
FNT entries 3-63 
FNT pointer 3-13 
Format 

card E-l 

program library 7-1 

relocatable subroutine D-l 
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Free-form cards E-3 
FST - 6X00 random instruction test 12-5 
Function, position (EDITLIB) 5-7 
Function cards (EDITLIB) 5-3 
Functions (EDITLIB) 

library revision 5-4 

system modification 5-3 



Hardware device 3-8 

Hollerith punched characters A-l 

*IDENT card (UPDATE) 6-9 

Identifiers, structure 6-3 

IEF Description 12-26 

Input file 3-64 

IN (FET) 3-14 

Input/output routines , utility 10-14 

*INSERT 

EDITSYM 7-6 

UPDATE 6-12 
I/O request 1-4 

JDATE macro 3-55 
Job 

card 2-2 

control cards 2-1 

flow 2-1 

priority 3-63 

termination 3-68 



Keyboard entries 9-1 
KILL 3-69 



*LABEL card (UPDATE) 6-6 

Label 

file 1-11 

file header 1-13; C-2 

file trailer 1-13; C-3 

standard C-l 

volume header 1-13; C-l 

volume trailer 1-13; C-3 

Labeled tape files 3-20 
creation date 3-21 
edition number 3-21 



60189400 Rev. L 



Index-5 



Labeled tape files (Cont'd) 
label name 3-20 
multi-file name 3-21 
multi-file tapes 3-21 
reel number 3-21 
retention cycle 3-21 
Labels, tape file 

file header 1-13 ; C-2 
file trailer 1-13; C-3 
volume header 1-13; C-l 
volume trailer 1-13; C-3 
Last code and status (FNT) 3-3 
Length (FET) 3-13 
LENGTH card (EDITLIB) 5-7 
Level 1-7 

marks 1-9 
numbers 1-7 
Library revision functions (EDITLIB) 5-4 
Library tape structure 5-1 
LIMIT (FET) 3-14 
LINK table D-6 
LIST card (EDITLIB) 5-4 
Listable output, (UPDATE) 6-12 
Logical file rame (FET) 3-5 
Logical records 1-7 
level marks 1-10 
level numbers 1-8 
termination 1-10 
LOAD card 2-7 
Load octal corrections 10-14 
Loader 

card 2-6 
directives 4-7 
overlays 4-8 
sections 4-9 
segments 4-9 
Loader execution 4-7 
LOADER macro 3-56 

reply 3-59 
Loading 

octal correction routines 10-14 
sequence 4-1 
LOADPF 13-22 

LPT - 501 line printer test 12-9 
LP1 - 512 line printer test 12-10 



Macros, FET creation 3-22 
Macros, system communication 3-26 
ABORT 3-54 
BKSP 3-48 
BKSPRU 3-48 
CHECKPT 3-52; 8-2 
CLOCK 3-55 
CLOSE 3-29 
CLOSER 3-31 
COMMON 3-49 
data function 3-26 
DATE 3-55 
ENDRUN 3-54 
EVICT 3-31 

file action requests 3-26 
JDATE 3-55 
LOADER 3-56 
LOADREQ 3-62 
MEMORY 3-51 
MESSAGE 3-53 
OPEN 3-27 
position functions 3-46 
READ 3-32 
READIN 3-35 
READN 3-33 
READNS 3-35 
READPP J -5 
READSKP 3-34 
RECALL 3-52 

REQUEST 3-26 

REWIND 3-49 

REWRITE 3-42 

REWRITEF 3-42 

REWRITER 3-42 

RPHR 3-34 

SKIPB 3-48 

SKIPF 3-46 

System action requests 3-51 

TIME 3-54 

WPHR 3-39 

WRITE 3-37 

WRITEF 3-38 

WRITEN 3-39 

WRITER 3-38 

WRITIN 3-44 

WRITOUT 3-39 
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Magnetic tape I/O 1-1 

definitions 1-1 

tape file structure 1-2 
label formats 1-2 
data formats 1-2 

end point processing 1-2 

end-of-file (tape mark) procedures 1-2 

end-of-reel procedures 1-4 

end of information procedures 1-4 

definition of I/O requests 1-4 

READ 1-5 

READN 1-7 

READSKP 1-8 

RPHR 1-10 

WRITE 1-11 

WRITER 1-12 

WRITEF 1-14 

WRITEN 1-16 

WPHR 1-17 

SKIPF 1-18 

SKIPB 1-19 

BKSP 1-20 

BKSPRU 1-20 
Map, memory 4-10 
MAP control cards 2-9 
Marks, level 1-10 

Maximum logical record size 3-18, 23 
Memory allocation 4-9 

segment 4-12 

system 4-9 

user 4-12 
MEMORY macro 3-51 
Memory map 4-12 
MESSAGE macro 3-53 
Messages 

COPYL 10-12 

COPYN 10-10 

error H-l 

UPDATE 6-20 
MLRS 3-18, 23 
MODE card 2-3 
MOVE card (EDITLIB) 5-3 
MTT - 6 OX magnetic tape test 12-8 
Multi-file 3-21 

names 3-21 
tapes 3-21 
Multiple read access 13-3 



Multiprogramming 1-2 

central memory usage 1-2 
control points 1-2 

Multi-reel file 1-12 

Multi-reel multi-file 1-12 

MY1 - 6X00 central memory test 12-6 



NOGO card 2-8 
Non allocatable files 3-66 
Non-zero disposition files 3-65 
NORERUN 3-69 



OPEN macro 3-27 

OUT (FET) 3-14 

Output directive control cards (UPDATE) 6-11 

Output file 3-65 

Output, listable (UPDATE) 6-12 

Output queue 3-63 

Overlapping corrections (UPDATE) 6-13 

OVERLAY 4-8 

checkpoint requests 8-4 

decks 4-8 

format 4-8 
Overlays 4-6 

DEBUG 11-15 

SNAP 11-11 

TRACE 11-7 
OWNCODE routine activity (FET) 3-19 



Parameters 

call (UPDATE) 6-1 
Passwords 13-4 
PBC routine 10-9 
Permanent files 

control cards 13-9 

definitions 13-1 

FD3 13-7 

functions 13-7 

macro expansion 13-8 

multiple read access 13-3 

parameters 13-7 

passwords 13-4 

permissions 13-4 

privacy procedures 13-3 

return codes 13-21 

utility routines 13-22 
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Permissions (FNT) 3-3; 13-4 
PIDL table D-l 

Physical record unit size (FET) 3-6 
Position function 3-46 

(ED IT LIB) 5-8 
PPLOADR 4-1 
Prefix table, subroutine D-l 
Print file conventions J-l 
Printed character sets A-l 
Priority, job 3-63 
Privacy procedures 13-3 
Private disk pack files 3-67 
Procedure 

checkpoint 8-1 

RESTART 8-6 
Program call card 2-7 
Program cards (utility) 10-1 
Program control cards 2-6 

call card 2-7 

EXECUTE card 2-7 

LOAD card 2-7 

NOGO card 2-8 
Program execution 2-6 
Program library 

compile output 7-3 
Program library format 7-1 

common decks 7-2 

compressed decks 7-3 

text decks 7-2 
Program libraries, structure 6-1 

card identification 6-3 

deck list 6-1 

directory 6-1 

text stream 6-2 
PURGE (permanent files) 13-3, 19 
♦PURGE card (UPDATE) 6-9 



Q option effects (UPDATE) 
Queue, input 3-63 
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Random access 1-11 
Random access bit (FET) 3-13 
Random access file 3-67 
Random binary file macro 3-22 
Random coded file macro 3-22 
*READ (UPDATE) 6-6 



READ macro 3-32 

READ IN macro 3-35 

READN macro 3-33 

READNS macro 3-35 

READSKP macro 3-34 

READY card (EDITLIB) 5-4 

RECALL macro 3-52 

Record identification card 10-8 

Record block size (FET) 3-10 

Recording technique 3-8 

REDUCE card 2-8 

Reel number, file 3-21 

Release bit (FET) 3-8 

RELEASE card 2-16 

Relocatable subroutine format D-l 

REMOVE card 2-15 

RE PL table D-6 

REQUEST 1-4; 2-10 

Request cards (utility) 10-1 

REQUEST checkpoint 8-1 

Request field length 10-15 

REQUEST macro 3-26 

Request macros, file action 3-26 

Request, RESTART 8-6 

Request, utility program field length 10-15 

RERUN 3-69 

RESPOND jobs 3-71 

RESTART card 2-4 

RESTART procedure 8-6 

RESTART request 2-4; 8-6 

* RE STORE 

EDITSYM 7-7 
UPDATE 6-12 

Retention cycle 3-21 

RETURN 2-16; 3-70 

REWIND card (COPYN) 10-7 

REWIND card (EDITLIB) 5-8 

♦REWIND (UPDATE) 6-6 

REWIND file 10-13 

REWIND macro 3-49 

REWRITE 3-42; 13-2 

REWRITEF 3-42 

REWRITER 3-42 

RFL routine 10-15 

RPACK card 2-14 

RPHR macro 3-34 

RTIME macro 3-26 

Routines, utility, see Utility routines 
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3-22 
3-22 



Sample source listing F-l 
SCOPE CIO codes 3-7 
Scopes, console and display 9-3 
Sections 4-7 
Security code (FNT) 3 -3 
Segment loading 
DEBUG 11-15 
SNAP 11-6 
TRACE 11-6 
Segment memory allocation 
Segmentation 4-4 
Sequence, loading 4-1 
Sequential binary file macro 
Sequential coded file macro 
Single reel file 1-12 
*SKIP (UPDATE) 6-6 
SKIPB card (EDITLIB) 5-8 
SKIPB macro 3-48 
SKIPB routine 10-13 
SKIPF card (COPYN) 10-13 

(EDITLIB) 5-8 
SKIPF macro 3-46 
SKIPR card (COPYN) 10-8 
*Slash card (UPDATE) 6-14 
SNACE 11-1 
SNAP 11-7 

Software, integration, hardware 
Special name files 3-65 
Standard labels C-l 
Storage, utility program dump 10- 
Structure 

identifiers 6-3 
library tape 5-1 
program library 6-1 
tape file 1-12 
text stream 6-2 
Subdirectory 13-2 
Subroutine 

central program control 3-19 
format, relocatable D-l 
prefix table D-l 
SWITCH card 2-3 
Symbol definitions , system G-l 
System action macros 3-51 
System display 9-1 

System Engineering File Analyzer (CEFAP) 
System Engineering File Description 12-18 
System memory allocation 4-7 
System modification function (EDITLIB) 5-3 
System symbol definitions G-l 



G-l 



-17 



12-24 



I 



Table,. File Environment 3-4 
Tables, subroutine D-l 

ENTR D-2 

FILL D-5 

LINK D-6 

PIDL D-l 

Prefix D-l 

REPL D-6 

TEXT D-3 

XFER D-8 
Tape file labels 1-13 
Tape file structure 1-12; 1-2 

labels 1-13 

multi-file reel 1-12 

multi-reel file 1-12 

multi-reel multi-file 1-12 

single reel file 1-12 
Tapes, multi-file 3-21 
Termination, logical records 1-9 
Text deck, program library 7-2 
Text stream, structure 6-2 
TEXT table D-3 
TIME macro 3-54 
TRACE 11-1 

TRANSFER card (EDITLIB) 5-5 
Type-ins, see display keyboard entries 



UBC 3-19 

UNLOAD macro 3-50, 70 

Unload file 10-13 

Unrestartable checkpoint dumps 8-6 

Unused bit count 3-17 

UPDATE 6-1 

card identification 6-3 

compressed card 6-3 

control and data cards 6-5 

deck list 6-1 

directory 6-1 

examples 6-23 

files 6-21 

listable output 6-19 

messages 6-31 

options 6-4, 19 
User memory allocation 4-12 
User processing bit (FET) 3-10 
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Utility routines 10-1 
COMPARE 10-16 
copy 10-2 

copy binary file 10-3 
copy binary record 10-3 
copy coded file 10-3 
copy coded record 10-3 
copy to offline listable form 10-6. 1 
COPYL 10-11 
COPYN 10-6.1 

dump extended core storage 10-15 
dump storage 10-15 
file manipulation 10-13 
octal correction 10-14 
permanent file 13 -22 
request field length 10-15 



Volume header label, tape file 1-13; C-l 
Volume trailer label, tape file 1-13; C-3 



WEOF (COPYN) 10-8 
*WEOR 

EDITSYM 7-6 

UPDATE 6-16 
Words, flag 2-2 
Working storage (FET) 3-14 
WPHR macro 3-39 
Write 13-2 
WRITE macro 3-37 
WRITEF macro 3-38 
WRITEN 3-38 
WRITER macro 3-38 
WRITES! 3-44 
WRITOUT macro 3-40 
WPHR macro 3-39 

XFER table D-8 

*YANK card (UPDATE) 6-13 
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